Du solltest die Procedure so ändern:
Delphi-Quellcode:
// parameter <sql> hat jetzt den Typ TStrings
procedure TInfoForm.ShowInfo( title:
string;
db: TSQLConnection;
sql: TStrings; init_val:
string );
Wahrscheinlich reicht das schon.
Falls nicht, versuch mal:
qry.SQL.Assign(sql);
Wenn das nicht klappt, dann
Delphi-Quellcode:
qry.SQL.Clear;
qry.SQL.AddStrings(
sql);