Thema
:
Delphi
Funktion optimieren
Einzelnen Beitrag anzeigen
x000x
Registriert seit: 21. Jan 2004
Ort: Bei Hamburg
308 Beiträge
Delphi XE2 Professional
#
12
Re: Funktion optimieren
4. Okt 2007, 02:10
Moin moin,
die Zuweisung zu L kann doch weggelassen werden...
markieren
Delphi-Quellcode:
//..
if
Length(s) <> 32
then
begin
Result := False;
Exit;
end
;
for
i := 1
to
32
do
//..
Peter
-= Gruss
Peter
=-
-= alias
x000x
=-
Zitat
x000x
Öffentliches Profil ansehen
Besuche die Homepage von x000x!
Mehr Beiträge von x000x finden