InputBox und InputQuery Eingabefeld farblich

[HolgerCW]

Hallo zusammen,

wie kann ich bei einer InputBox oder InputQuery das Eingabefeld farblich machen ?

Gruss

Holger

[RavenIV]

Was meinst Du mit "InputBox" und "InputQuery" ?

Sind das Standard-Komponenten von Delphi, oder was?
Falls es Standard-Komponenten sind, wird es vermutlich nicht gehen.

[shmia]

Du hast doch den Sourcecode von InputQuery in der Unit Dialogs.
Du kannst diesen Sourcecode in eine eigene Unit kopieren und zusätzlich eine Farbe zuweisen:

Delphi-Quellcode:

...
      Edit := TEdit.Create(Form);
      with Edit do
      begin
        Color := clLime;   // <======= hinzu
        Parent := Form;
        Left := Prompt.Left;
        Top := MulDiv(19, DialogUnits.Y, 8);
        Width := MulDiv(164, DialogUnits.X, 4);
        MaxLength := 255;
        Text := Value;
        SelectAll;
      end;

[HolgerCW]

Hallo,

das InputQuery ist eine funktion in Delphi.

Kannst Du mir auch ein Beispiel für die InputQuery liefern, da ich Dein Beispiel nicht darauf umgebaut bekomme ?

Gruss

Holger