so wie du das machst, wird die function überhaupt nie aufgerufen und damit wird der wert nie geändert, zumindestens ist das aus deinem Code nicht ersichtlich
du könntets aber die globale Veriabe sparen:
Delphi-Quellcode:
function GetLastEntry: Integer;
begin
Result := MainForm.StringGrid.RowCount -1 //-1 wegen fixierter Zeile
end;
procedure TMainForm.LastEntryClick(Sender: TObject);
begin
showmessage('Das Grid hat ' +IntToStr(GetLastIndex) +' Zeilen')
end;
Mfg Frank