Spalten überprüfen...

[Simo]

Hey Leute

Ich bin ein Anfänger in Delphi und brauche Ihre Unterstützung..

Ich muss die 15-Spalten einer XML-Tabelle überprüfen : Doppelter Eintrag, Integer, Float..usw
Wenn ich z.B die Spalte 1 auf doppelter Eintrag überprüfe, muss die Zeile, in der der Eintrag zwei mal vorkommt markiert werden (Oder Cursor muss hin...).

Delphi-Quellcode:

function TMyChek.MyChekGleich(StringGrid:TggStringGrid):Integer ;
var
  a , b ,c   : integer;
  Inhalt_Check : string;
  iDoppeltcounter:integer;
begin

  iDoppeltcounter:=0;
  Result:=-3;
  b:= StringGrid.RowCount; // Anzahl der Zeilen...


  for a:=0 to b do begin
    Inhalt_Check:=StringGrid.Cells[0,a]; // Zeile Um 1 erhöhen...
     for c:=0 to b do begin
        if Inhalt_Check=StringGrid.Cells[0,c] then begin
           iDoppeltcounter:=iDoppeltcounter+1;
             if iDoppeltcounter>1 then begin
                Result:=c;
                StringGrid.Selection:= TGridRect(Rect(0,Inhalt_Check)); //...??
                 exit;
                 iDoppeltcounter:=0;
             end;
        end;
     end;
  end;
end;).

Es klappt nicht mit der Markierung oder (Cursor weiss ich gar nicht wie..)
Wäre sehr dankbar wenn Sie mir helfen können