Einzelnen Beitrag anzeigen

Benjin

Registriert seit: 1. Nov 2004
Ort: München
64 Beiträge
 
Delphi 7 Enterprise
 
#1

TStringgrid meldet eAccessViolation

  Alt 28. Sep 2005, 17:40
Hallo,

ich habe auf einer Registerkarte eines TPageControl ein TStringgrid positioniert.

Nun bekomme ich jedesmal, wenn ich Eigenschaften des Grids aufrufen möchte eAccessViolations.

Das Grid ist nicht zur Laufzeit erstellt, womit ich davon ausgehe dass ich es nicht als Istanz initiieren muss.

Hier die hauptsächliche betroffene Prozedur:
Delphi-Quellcode:
procedure TFormSettings.setIdentifiers;
var
i, ZeilenanzahlBuerger, ZeilenAnzahlWirtschaft : Integer;
Datei: TStringList;
begin
Datei:=TStringList.Create;
Datei.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'identifiers.txt');

splitString(Datei.Strings[0],';',IdentifierNameW);
splitString(Datei.Strings[1],';',IdentifierZeilenNrW);
splitString(Datei.Strings[2],';',IdentifierAusdruckW);
splitString(Datei.Strings[3],';',IdentifierName);
splitString(Datei.Strings[4],';',IdentifierZeilenNr);
splitString(Datei.Strings[5],';',IdentifierAusdruck);


ZeilenanzahlBuerger := StringGridBuerger.ColCount;
ZeilenanzahlWirtschaft := StringGridWirtschaft.ColCount;

for i:= 0 to ZeilenanzahlBuerger-1 do
  begin
  IdentifierName.Strings[i] := FormSettings.StringGridBuerger.Cells[i, 0];
  IdentifierAusdruck.Strings[i] := FormSettings.StringGridBuerger.Cells[i, 2];
  IdentifierZeilenNr.Strings[i] := FormSettings.StringGridBuerger.Cells[i, 1];
  end;

for i:= 0 to ZeilenanzahlWirtschaft-1 do
  begin
  IdentifierNameW.Strings[i] := FormSettings.StringGridWirtschaft.Cells[i, 0];
  IdentifierAusdruckW.Strings[i] := FormSettings.StringGridWirtschaft.Cells[i, 2];
  IdentifierZeilenNrW.Strings[i] := FormSettings.StringGridWirtschaft.Cells[i, 1];
  end;

Datei.Free;
end;
..... - Kurt - .....
  Mit Zitat antworten Zitat