Zuweisungsscanner????

[DGL-luke]

das ganze kannst du kürzer auch haben.....
(und weniger c&p verdächtig)

Delphi-Quellcode:

type TCharSet:set of char; // eine Menge von Zeichen

function explode(s:string; chars:TCharSet);
var i:integer;
begin
 for i := 1 to length(s) do  //den ganzen string durchlaufen
  if s[i] in chars then handle(i,s[i]); //wenn gefunden, dann index und character an handler übergeben.
end;

procedure handle(index:Integer;character:char);
begin
showmessage('am index ' + inttostr(i) + ' trat der char '+ character + ' auf.'); //Dialogbox mit Index und Character ausgeben
// hier irgendwas machen. zum besipiel die zuweisung auflösen.
end;

EDIT: für den in operator liebe ich delphi.......