Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Nov 2008
Dann versuch es mal mit der langen Version:function LeseDieNaechsteZeile(const StringGrid: TStringGrid; aCol: integer = 1): string;
var aRow: Integer;
begin
aRow := StringGrid.Row;
if aRow < Pred(StringGrid.RowCount) then
Inc(aRow)
else
aRow := StringGrid.FixedRows;
StringGrid.Row := aRow;
Result := StringGrid.Cells;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Nov 2008
Das nenne ich mal eine elegante Lösung :thumb:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Nov 2008
Dann frag doch einfach StringGrid.Row ab, lies die Zelle aus und setze Row einen weiter.