zum besseren verständnis hier nochmal der gesamte code der auf knopfdruck ne neue column anlegt in beiden stringgrids
Delphi-Quellcode:
procedure TForm2.neuermitarbeiterClick(Sender: TObject);
var
Column: Integer;
NewColumn: Integer;
begin
Grid.ColCount := Grid.ColCount + 1;
proviGrid.ColCount := proviGrid.ColCount + 1;
for Column := Grid.ColCount - 1 downto NewColumn do
Grid.Cols[Column].Assign(Grid.Cols[Column - 1]);
for Column := proviGrid.ColCount - 1 downto NewColumn do
proviGrid.Cols[Column].Assign(proviGrid.Cols[Column - 1]);
Grid.cells[NewColumn - 1,0] := '';
proviGrid.cells[NewColumn - 1,3] := 'test';
if grid.Colcount > 9 then
grid.Colcount:=9;
if provigrid.Colcount > 9 then
provigrid.Colcount:=9;
end;
die zeile
proviGrid.cells[NewColumn - 1,3] := 'test';
hab ich jetzt nur zu testzwecken verändert aber es tut sich nichts beim erstellen einer neuen column texttechnisch
ps: sorry für doublepost