Einzelnen Beitrag anzeigen

s-off
(Gast)

n/a Beiträge
 
#11

Re: Zugriffsverletztung ohne grund - ratlos..

  Alt 14. Sep 2007, 07:59
Dominik hat schön die allgemeine Syntax beschrieben.

Hier noch ein Beispiel mit einer TStringlist, welche im OnCreate Deiner Mainform erzeugt, und im OnDestroy Deiner Mainform wieder freigegeben wird.

@Dominik
Möchte Dir nicht reinpfuschen - nur ist ein Beispiel, welches auf den aktuellen Fall zugeschnitten ist, für manche einfacher zu verstehen. Das allgemeine Vorgehen ist natürlich noch wichtiger.

Delphi-Quellcode:
Unit Unit1;

Interface

Uses
   Windows,
   Messages,
   SysUtils,
   Variants,
   Classes,
   Graphics,
   Controls,
   Forms,
   Dialogs;

Type
   TForm1 = Class(TForm)
      Procedure FormCreate(Sender: TObject);
      Procedure FormDestroy(Sender: TObject);
   private
      lstMeineStringlist: TStringlist; //Deklaration unserer zukünftigen Instanz einer TStringlist
   End;

Var
   Form1: TForm1;

Implementation

{$R *.dfm}

Procedure TForm1.FormCreate(Sender: TObject);
Begin
   lstMeineStringlist := TStringList.Create; //Die Stringliste erzeugen
End;

{
[...]
Hier stehen die Methoden, in denen mit der Stringliste gearbeitet wird.
[...]
}


Procedure TForm1.FormDestroy(Sender: TObject);
Begin
   FreeAndNil(lstMeineStringlist); //Die Stringliste wieder freigeben
End;

End.
  Mit Zitat antworten Zitat