 |
 |
 |
 |
 |
|
|
|
|
Registriert seit: 24. Apr 2006 Ort: Oelde 267 Beiträge Delphi 2009 Professional |
#1
Re: Text einfärben
19. Sep 2006, 17:44
Man könnte es so machen. Man muss nur Folgendes in das Change-Event des Edits reinschreiben
Delphi-Quellcode:
Dann wird wenn das erste Zeichen ein Minus ist der Text Rot eingefärbt. Sogar wenn vor dem Minus noch Leerstellen sind.
if trim((Sender as TEdit).Text)[1] = '-' then
(Sender as TEdit).Font.Color := clRed else (Sender as TEdit).Font.Color := clGreen; Hoffe es hilft.  //Edit wusste nicht das es eine Zahl ist.
Frederic H.
|
|
ForumregelnEs ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.
BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus. Trackbacks are an
Pingbacks are an
Refbacks are aus
|
|
Hybrid-Darstellung
