Einzelnen Beitrag anzeigen

Benutzerbild von RWarnecke
RWarnecke

Registriert seit: 31. Dez 2004
Ort: Stuttgart
4.408 Beiträge
 
Delphi XE8 Enterprise
 
#4

Re: Zusammenfassen, Verbessern von vielen IF-Schleifen

  Alt 13. Nov 2006, 23:02
Zitat von Muetze1:
Ansonsten hatten wir schonmal festgestellt, dass ein Vergleich auf einen leeren String schneller sein sollte als die Länge des Strings zu ermitteln und den auf 0 zu vergleichen.
Werde ich machen. Danke für den Tipp.

Zitat von Muetze1:
Und nochwas: IF Bedingungenen/Verzweigungen sind keine Schleifen...
Ja, Du hast Recht. Habe ich falsch geschrieben.


Zitat von mkinzler:
Du könntest sie in eine Funktion auslagern, welchr du dann mit dem Edit als Parameter aufrufst.
Du meinst das doch bestimmt so oder ?
Delphi-Quellcode:
procedure CheckEdit(Pflicht : TEdit);
begin
  If Pfilcht.Text = 'then
  begin
    Pflicht.Color := clRed;
    Pflicht.Font.Color := clWhite;
  end
  else
  begin
    Pflicht.Color := clWindow;
    Pflicht.Font.Color := clWindowText;
  end;
end;

.
.
.
CheckEdit(Edt_Username);
CheckEdit(Edt_UserID);
u.s.w.
.
.
.
Ich hatte da eigentlich irgendwie an eine FOR-Schleife gedacht. Geht das überhaupt ?
Rolf Warnecke
App4Mission
  Mit Zitat antworten Zitat