TEdit + Border color ?

[bwolf]

Hi all,

bei meinem Formularen würde ich gerne die Felder optisch hervorheben, die der User vergessen hat einzugeben.
Dazu hab ich mir eine einfache Funktion geschrieben, das das entsprechende Feld rot einfärbt und ne Meldung ausgibt.

Delphi-Quellcode:

procedure requireInput(Edit : TDBEdit; Nachricht : string);
begin
  if trim(Edit.Text) = '' then
  begin
      showmessage(Nachricht);
      Edit.Color := clRed;
      Edit.SetFocus;
      Edit.Text := '';
      abort;
  end
  else
     Edit.Color := clWhite;
end;

So, nun mein eigentliches Problem:
Statt das ganze Feld rot zu färben, würde ich gern den Rand / Border rot machen.
Ich hab mir diese BorderStyle-Property angeschaut, aber keine Idee wie man da Farbe mit rein bringen soll.

Thx für eure Hilfe,
ben

[Gentleman]

Hallo,

Wie man die Border Color duch Code ändern könnte, wüsste ich jetzt auch nicht, aber ich habe mal bei torry ein paar Komponenten gefunden, die diese Eigenschaft haben. kannst du dir ja mal angucken, die Frage ist bloß, ob diese dann auch optisch zu deinem Formular passen.

http://www.torry.net/quicksearchd.ph...tyle&Title=Yes

Gruß,
Lennard

[bwolf]

Hi,

thx für deinen Tipp.

An fremde Komponenten hab ich auch schon gedacht - allerdings verwende ich XPMenu-Komponente, und 'fremde' Textfelder werden von dieser ja dann nicht berücksichtigt, oder sehe ich da was falsch ?

Thx & Greets,
ben

[RavenIV]

wenn diese Fremdkomponenten von TCustomEdit abgeleitet wurden, dann sollte das trotzdem klappen mit dem XPMenu.

[Gentleman]

Also, diese FlatStyle Komponenten machen das glaub ich nicht, deswegen hatte ich auch bedenken, ob sie in dein Formular reinpassen.

Kann man nicht ansonsten einfach ein Image auf das Edit "rauflegen" und dieses dann einfach anzeigen? Das ist dann zwar keine besonders elegante Lösung aber funktionieren tut es

Gruß,
Lennard

[Hawkeye219]

Ich würde eine TShape-Komponente so hinter das Editfeld legen, daß ihr Rand noch zu sehen ist. Über die Pen-Eigenschaft von TShape kann man das Aussehen des Rahmens steuern.

Gruß Hawkeye