Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
8. Sep 2004
:hello: jo, du bist mein Mann! Hätte nicht gedacht, dass das Problem von so weit unten herrührt.
Erstmal war die if-Abfrage im CanChange nicht sauber, da der TreeUpdate auch bei List = nil aufgerufen wurde und 2. habe ich den saudummen Fehler gemacht, den ListView vor Create an den TreeView zu binden. :duck:
Was für ein Newbie-Fehler..
Vielen Dank, die volle Punktzahl geht an Dich!
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
8. Sep 2004
TMyShellTreeView = class(TShellTreeView)
private
FMyListView: TMyListView;
protected
function CanChange(Node: TTreeNode): Boolean; override;
published
property WMyListView: TMyListView read FMyListView write FMyListView;
end;
function TMyShellTreeView.CanChange(Node: TTreeNode): Boolean;
var
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
8. Sep 2004
aus einer anderen Klasse.
sorry, habe ich bereits angepasst. ja ist das selbe!
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
8. Sep 2004
Danke für den Hinweis, ist mir bekannt. Wie man sehen kann, greife ich nur von TMyListView auf den Thread zu, nicht umgekehrt.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
8. Sep 2004
constructor TMyListView.Create(AOwner: TComponent);
begin
inherited;
FThumbnailThread := TThumbnailThread.Create(Self);
FThumbnailThread.Resume; //Funktioniert
end;
constructor TThumbnailThread.Create(const ListView: TMyListView);
begin
inherited Create(True);
Priority := tpLowest;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
8. Sep 2004
Diese Klasse
TMyListView = class(TCustomListView)
private
FThumbnailThread: TThumbnailThread;
protected
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
procedure TreeUpdate(NewRoot: PItemIDList);