Hab für mich ne Lösung gefunden.
Code:
procedure TStringAlignGrid.ListToCells(List: TList);
var v: PAnsiString; // original v: PString;
ACol, ARow: longint;
begin
for ACol:= 0 to ColCount- 1 do
for ARow:= 0 to RowCount- 1 do begin
v:= GetItemCell(ACol, ARow, List);
if v <> NIL then Cells[ACol,ARow]:= v^
else Cells[ACol,ARow]:= '';
end;
end;
Und es schein alles zu gehen. Kann mir da einer erklären (will ja lernen) warum dies zw. D2010 und DXE anders ist?
Grüße Kurti