Listbox mit StrinGrid vergleichen!?

[RX3]

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