Zitat von
BrunoT:
Hi Heike,
sorry
Delphi-Quellcode:
for i:=0 to DBGrid1.SelectedRows.Count-1 do
Begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i])); //Setzt einen Datensatz weiter
s:=''; //leeren des Strings
for j := 0 to {FieldCount-1} 3 do //beschränkt auf die ersten 3 Felder
begin
if (j>0) then s:=s+', ';
s:=s+Fields[j].AsString;
end;
Da hat sich doch der fiese Fehlerteufel eingeschlichen. //qnd
mfg
BrunoT
Da muss sich noch ein Fehler eingeschlichen haben! Jetzt wird nur noch die Überschrift gedruckt. Fast das gleiche Problem hatte ich auch, beim kopieren in einem TMemo. Entweder wurde nur eine Zeile kopiert oder nichts.
Heike.