Danke für die Mithilfe.
Die Lösung ist anstatt von SQLQuery SQLDataSet zu verwenden.
Dann wird auch die Anzahl der gefundenen Datensätze mit RecordCount zurückgegeben.
with Drucki.SQLDataSet do
begin
CommandText := 'Select * from PERSONNELITIES Where SVtype = "H" ';
open;
TempInteger:= RecordCount;
end;
Mfg Klaus
