Ignore:
Timestamp:
Dec 4, 2023, 7:18:18 PM (12 months ago)
Author:
chronos
Message:
  • Fixed: More high dpi related fixes.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LocalPlayer/Select.pas

    r473 r474  
    856856begin
    857857  InputDlg.Caption := Phrases.Lookup('TITLE_CITYNAME');
    858   InputDlg.EInput.Text := CityName(MyCity[cix].ID);
     858  InputDlg.EditInput.Text := CityName(MyCity[cix].ID);
    859859  InputDlg.CenterToRect(BoundsRect);
    860860  InputDlg.ShowModal;
    861   if (InputDlg.ModalResult = mrOK) and (InputDlg.EInput.Text <> '') and
    862     (InputDlg.EInput.Text <> CityName(MyCity[cix].ID)) then
     861  if (InputDlg.ModalResult = mrOK) and (InputDlg.EditInput.Text <> '') and
     862    (InputDlg.EditInput.Text <> CityName(MyCity[cix].ID)) then
    863863  begin
    864864    CityNameInfo.ID := MyCity[cix].ID;
    865     CityNameInfo.NewName := InputDlg.EInput.Text;
     865    CityNameInfo.NewName := InputDlg.EditInput.Text;
    866866    if CityNameInfo.GetCommandDataSize > CommandDataMaxSize then
    867867      Delete(CityNameInfo.NewName, Length(CityNameInfo.NewName) -
     
    885885begin
    886886  InputDlg.Caption := Phrases.Lookup('TITLE_MODELNAME');
    887   InputDlg.EInput.Text := Tribe[Me].ModelName[mix];
     887  InputDlg.EditInput.Text := Tribe[Me].ModelName[mix];
    888888  InputDlg.CenterToRect(BoundsRect);
    889889  InputDlg.ShowModal;
    890   if (InputDlg.ModalResult = mrOK) and (InputDlg.EInput.Text <> '') and
    891     (InputDlg.EInput.Text <> Tribe[Me].ModelName[mix]) then
     890  if (InputDlg.ModalResult = mrOK) and (InputDlg.EditInput.Text <> '') and
     891    (InputDlg.EditInput.Text <> Tribe[Me].ModelName[mix]) then
    892892  begin
    893893    ModelNameInfo.mix := mix;
    894     ModelNameInfo.NewName := InputDlg.EInput.Text;
     894    ModelNameInfo.NewName := InputDlg.EditInput.Text;
    895895    if ModelNameInfo.GetCommandDataSize > CommandDataMaxSize then
    896896      Delete(ModelNameInfo.NewName, Length(ModelNameInfo.NewName) -
Note: See TracChangeset for help on using the changeset viewer.