Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

Re: eine funktion umschreiben

  Alt 26. Nov 2003, 15:49
Delphi-Quellcode:
function foo(s: String): Boolean;
begin
  if length(s) > 0 then
  begin
    ShowMessage(s);
    result := True;
  end
  else
    result := False;
end;
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat