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