function SendText(const UserID : Integer; Text : String) : Boolean;
Fehlerprüfung in die Funktion. Alles ok, dann Rückgabewert = true sonst Rückgabewert = false;
Im Programm muss man dann halt den Rückgabewert der Funktion auswerten und entsprechend reagieren.
Grob in etwa so:
Delphi-Quellcode:
function SendText(
const UserID : Integer; Text:
String) : Boolean;
begin
Result := UserID > 0;
try
if Result
then begin
// Machen, was zu tun ist ...
end else begin
// Wenn hier was zu retten sein sollte ...
end;
except
on e :
Exception do begin
Result := false;
// und weitere Fehlerbehandlung.
// ggfls. Raise ...
end;
end;
end;