Ergebnis der Suchanfrage

• Forum: Datenbanken

  AW: Funktion mit Query; wie rückgabeWert?

   
    by haentschman, 30. Jan 2012
  Hallo...
  
  function ReadKatalognummer(Vorname : String) : String;
  begin
  Result:= ''; //zur Vorsicht
  DataModule1.ADOQuery_ReadKatalognr.SQL.Text :=
  'SELECT Katalognr '+
  'FROM Schueler '+
  'WHERE Name = '''+Vorname+''' ';
  DataModule1.ADOQuery_ReadKatalognr.Open;