funzt auch nich!!
so das hier is jetz der komplette code des buttonClick ereignis:
Delphi-Quellcode:
begin
for i:=0 to ListBox1.items.count-1 do // für jedes element der listbox
begin
for x:=0 to StringGrid1.ColCount-1 do // für jede Spalte des grids
begin
for y:=0 to StringGrid1.RowCount-1 do // für jede Zeile
begin
if ListBox1.items[i] = StringGrid1.cells[y,x] then
begin
if Edit2.Text = 'TAB' then
vTrennzAus := chr(vk_tab)
else
vTrennzAus := Edit2.Text;
for y := global_col to StringGrid1.Col do
begin
for x := 0 to StringGrid1.RowCount - 1 do
begin
vZeile := vZeile + StringGrid1.Cells[y,x] + vTrennzAus;
end;
memo1.Lines.Add(vZeile);
vZeile := '';
end;
end;
end;
end;
end;
end;
Der Fehler muss meiner Meinung nach hier liegen:
for y := global_col to StringGrid1.Col do
da eigentlich genau das gemacht wird was ich haben will, allerdings nur für die aktuell selektierte StringGrid-Spalte bzw Zelle...
Ich werd noch verrückt mit dem schiss hier