Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TEdit + Border color ? (https://www.delphipraxis.net/70052-tedit-border-color.html)

bwolf 24. Mai 2006 11:26


TEdit + Border color ?
 
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 24. Mai 2006 12:02

Re: TEdit + Border color ?
 
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 24. Mai 2006 12:16

Re: TEdit + Border color ?
 
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 24. Mai 2006 12:25

Re: TEdit + Border color ?
 
wenn diese Fremdkomponenten von TCustomEdit abgeleitet wurden, dann sollte das trotzdem klappen mit dem XPMenu.

Gentleman 24. Mai 2006 12:30

Re: TEdit + Border color ?
 
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 :wink:

Gruß,
Lennard

Hawkeye219 25. Mai 2006 10:22

Re: TEdit + Border color ?
 
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


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz