Hallo Marabu
erhalte dann einen Fehler beim suchen.
Zitat:
---------------------------
Benachrichtigung über Debugger-
Exception
---------------------------
Im Projekt Project1.exe ist eine
Exception der Klasse EAccessViolation aufgetreten. Meldung: 'Zugriffsverletzung bei Adresse 004BD5D8 in Modul 'Project1.exe'. Lesen von Adresse 0000004B'. Prozess wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.
---------------------------
OK Hilfe
---------------------------
Evt. liegt es an der TMS Stringgrid Kompo.
Bleibt hier in der
IDE stehen:
if IsBaseCell then
Delphi-Quellcode:
function TCellProperties.GetBaseCell(c, r: Integer): TPoint;
begin
if IsBaseCell then
Result := Point(c,r)
else
begin
if (CellSpanX <> - 1) and (CellSpanY <> - 1) then
Result := Point(c - CellSpanX,r - CellSpanY)
else
Result := Point(c,r)
end;
end;
Siehst du da einen Zusammenhang?
capo