Buchstabensuche !aller! Felder

[Lotus]

Folgendes Problem.. ich moechte eine Suchfunktion machen (nur für Buchstaben).. diese funktion soll mir alle Stellen (Felder) von a liefern an denen der Buchstabe = dem gesuchtem ist!
ich hab dann diese function geschrieben er meint dauernd fehler aber ich erkenne ihn nirgends!!!

Delphi-Quellcode:

function suche2(buchstabe:string):integer;
var i2:integer;
begin
for i2:=1 to nf do begin
  if a[i2] <> buchstabe[1] then Inc(i2) // <--- Hier soll Fehler sein
  else begin
  suche2:=suche2 + i2 + ',';
  Inc(i2);
  end
  end
end;

hoffe ihr könnt mir helfen