Moin,
Zitat von
M. Hassmann:
Delphi-Quellcode:
Node := vst.GetFirstSelected;
while Assigned(Node) do
begin
ShowMessage(TOMeineDaten(vst.GetNodeData(vst.FocusedNode)^).Pfadname);
Node := vst.GetNextSelected(Node);
end;
Häh? Ich wage zu behaupten, dass bei diesem Code N-mal dieselbe Message ausgegeben wird.
Wenn du schon ein Node zum iterieren benutzt, wieso sprichst du es dann nicht auch an?
Delphi-Quellcode:
Node := vst.GetFirstSelected;
while Assigned(Node) do
begin
ShowMessage(TOMeineDaten(vst.GetNodeData(Node)^).Pfadname);
Node := vst.GetNextSelected(Node);
end;
Grüße,
Max