bei datei laden ';' ignorieren...

[Headi]

Hallo Leute,

Also ich habe es einfach noch nicht hingekriegt mein Problem zu lösen.
Ich habe eine datei, in der die zeilen, die mit ";" beginnen nicht geladen werden dürfen.
Jetzt nur wie ignoriere ich diese Zeilen?
Ich lade jetzt die daten in ein stringgrid, nur möchte ich ungerne meinen ganzen code umschreiben.
Nur wie mache ich das jetzt?

ich denke mit RightStr und LeftStr sollte ich einfach an das erste zeichen rankommen, aber wie sag ich dass er dann diese zeile nicht laden darf?
Naja ich denke ihr wisst schon was ich meine.

Hier mal mein code zum laden der Daten:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);  //sfv file öffnen
var
  i : integer;
begin

  if OpenDialog1.Execute then
   begin
    SL.LoadFromFile(OpenDialog1.FileName);      //sfv daten in stringlist speichern
    SL.Delimiter :=' ';

    SLSub.Clear;

    StringGrid1.RowCount:=SL.Count+1;    //stringgrid zeilen erstellen

    for I := 0 to SL.Count - 1 do
     begin
      SLSub.DelimitedText := SL[I];

      StringGrid1.Cells[0, (1+(I))]:=SlSub[0];  //dateiname in stringgrid einfügen
      StringGrid1.Cells[2, (1+(I))]:=Uppercase(SlSub[1]);  //hash wert in stringgrid einfügen
      StringGrid1.Cells[1, (1+(I))]:='ready';   //status gleich ready
     end;

    //SLSub.Free;

    //sl.Free;
    Button2.Enabled:=true;
    Button4.Enabled:=false;
   end;
end;

hoffe ihr könnt mir eine bei einer Lösung helfen, die nicht den ganzen code verändert.

vielen dank schonmal

greez headi