Einzelnen Beitrag anzeigen

roth

Registriert seit: 25. Nov 2005
Ort: -
72 Beiträge
 
#7

Re: Komponenten freigeben - Invalid pointer operation

  Alt 12. Okt 2006, 11:31
Delphi-Quellcode:
 if countCombobox = 0 then
          countCombobox := 1;
        i := anz_bedingungen;
        SetLength(mybox1, i+1);
        SetLength(mybox1[i],3);
        mybox1[i][countCombobox] := TComboBox.Create(Self);
        mybox1[i][countCombobox].Parent := Form1.PageControl1.ActivePage;
        mybox1[i][countCombobox].Text := titel;
        mybox1[i][countCombobox].Left := left;
        mybox1[i][countCombobox].Top := 38+(mybox1[i][countCombobox].Height+10)*i;
        mybox1[i][countCombobox].Width := breite;
        mybox1[i][countCombobox].Items := inhalt;

        countCombobox := countCombobox +1;

        if countCombobox > 3 then
          countCombobox := 1;
anz_bedingungen wird natürlich raufgezählt
  Mit Zitat antworten Zitat