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 !
