Funktionen mit zwei Rückgabewerten?

[Go2EITS]

So z. B.
Procedure StoreDBStrings(Var String1,String2:String);
begin
// Holen der Daten aus der Datenbank und in Datenbankstring1 und Datenbankstring2;
...
//Zuweisen der beiden Strings:
String1:=Datenbankstring1;
String2:=Datenbankstring2;
end;
Natürlich kannst Du beim Holen der Daten aus der Datenbank gleich String1 und String2 die Daten zuweisen.

oder etwas schöner...

Delphi-Quellcode:

Function StoreDBStrings (Var String1,String2:String):boolean;
begin
// Holen der Daten aus der Datenbank
...
Erfolgreich? //GetDBGetStrings sollte auch eine Funktion von Typ Boolean sein...
if GetDBgetStrings then  //Ist klar? "if GetDBgetStrings" steht für  "if GetDBgetStrings=true"
begin
//Zuweisen der beiden Strings:
String1:=Datenbankstring1;
String2:=Datenbankstring2;
result:=true 
end
else result:=false;
end;

Ach ja: Wenn der Wert eine Zahl ist, musst du entsprechend ein IntToStr oder FloatToStr verwenden.

@Christian18 Schönes Beispiel mit den Records !