DElphi<>Excel ??

[Vader]

hallo,


eine frage: bei diesem beispiel lege ich die zelle mittles spineditwert fest zb 1 zeile 1 spalte,
den wert schreibt dann in das editfeld

ich möchte jetzt mehrere werte aus zellen in mehrere editfelder auslesen zb. zeile1 spalte1,
zeile2 spalte1, zeile3 spalte1, aber ich möchte das ohne spinedits festlegen, denn die werte
die ich aus der tabelle1 auslese sind immer aus den gleichen zellen wie zeile1 spalte1,
zeile2 spalte1, zeile3 spalte1

wie muß ich diesen code dann umschreiben ??

Delphi-Quellcode:

procedure TForm1.Werteauslesen1Click(Sender: TObject);
begin
Edit1.Text:=ReadCell(SpinEdit1.Value,SpinEdit2.Value);
Edit2.Text:=ReadCell(SpinEdit3.Value,SpinEdit4.Value);
Edit3.Text:=ReadCell(SpinEdit5.Value,SpinEdit6.Value);
end;



function TForm1.ReadCell(Row, Col: Integer): String;
var
  CellRange : Range;
begin
  CellRange:=ExcelWorksheet1.Cells;
  Result:=CellRange.Item[Row,Col].Value;
end;

mfg vader