Fehlermeldung "ELEMENT HAT KEIN FENSTER"

[DP-Maintenance]

Dieses Thema wurde am "31. Jul 2015, 15:02 Uhr" von "Luckie" aus dem Forum "Programmieren allgemein" in das Forum "GUI-Design mit VCL / FireMonkey / Common Controls" verschoben.

[bernhard_LA]

danke für die Diskussion , so scheint es zu spielen :

Delphi-Quellcode:

function TCheckListBox2.getSelectedItems: TStringList;
var
  i: integer;
begin
  [B]if assigned(self.Parent) then[/B]
  begin
    if assigned(FSelectedItems) then
    begin
      FSelectedItems.Clear;
      for i := 0 to self.count - 1 do
      begin
        if (self.Checked[i] = true) then
        begin
          FSelectedItems.Add(self.Items[i]);
        end;
      end;
      result := FSelectedItems;
    end;
  end;
end;

bin jetzt am testen !