Teilstring suchen

[djpaull]

Und die Stelle, wo man sie zum ersten mal gefunden hat. Weitere Nullen sind unwichtig.

Edit1

Ich dachte an sowas wie:

Delphi-Quellcode:

Procedure TForm1.SucheNull;
 var Text,SuchText, Test:string;
     Suchindex: Integer;
begin
  Text:=TextFeld.Text;
  Suchtext := '0';

  begin
    // Find the position of the last 0
    Suchindex := LastDelimiter(Suchtext, Text);
    //ShowMessage('The last 0 is at '+IntToStr(Suchindex));
  end;

  if Suchindex = 0 then
  Ausgabe.Text:= '';
  if Suchindex = 1 then
  Ausgabe.Text:= '0';
  if Suchindex = 2 then
  Ausgabe.Text:= '00';
end;

ist nur so Gedankenansatz...