StringGrid ausrechnen??

[MondoShiva]

Ich versuche seit einigerzeit einen stringgrid auszurechnen, jedoch stellt sich mir delphi als eine unüberwindbare wand dar und lässt mich leiden!hier soweit ich bin nur das ausrechnen der zellen geht nicht

beispiels weise steht in der aritmatik:

minus #9 12 #9 23
usw.
(#9 tab)

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Panel: TPanel;
    Open: TButton;
    save: TButton;
    calculate: TButton;
    StringGrid: TStringGrid;
    OpenDialog: TOpenDialog;
    SaveDialog: TSaveDialog;
    Transport: TButton;
    procedure OpenClick(Sender: TObject);
    procedure TransportClick(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.OpenClick(Sender: TObject);
begin
    opendialog.Execute;
//    RichEdit.Lines.LoadFromFile(opendialog.FileName);
//    opendialog.Execute;
//    richedit.linies.
//    stringGrid.Cells[1,1] := 'fdggjkfdgjkg';//.LoadFromFile(opendialog.FileName);

end;

procedure TForm1.TransportClick(Sender: TObject);
var
  f: textfile;
  Spalte1,spalte2: String;
  i, count: Integer;
  delimiter: char;
  mylist : tstringlist;

begin
  opendialog.Execute;
  mylist := TStringList.Create;
  mylist.LoadFromFile(Opendialog.FileName);
  mylist.Delimiter := #9;
  mylist.DelimitedText := mylist.Text;
  count := 0;
  i:=0;


//  if  then  ;


  while count < mylist.Count do
  begin
     stringgrid.Cells[1,i+1] := mylist.Strings[count];
     stringgrid.Cells[2,i+1] := mylist.Strings[count+1];
     stringgrid.Cells[3,i+1] := mylist.Strings[count+2];
     count := count + 3;
     inc(i);
  end;


end;

end.

kann mir einer helfen das problem zu bewältigen?