On Thu, 12 Sep 2013 06:39:55 +0100
Richard Mace <[email protected]> wrote:
> [...]
> procedure TfrmMain.tvMainSelectionChanged(Sender: TObject);
> begin
Sender is the tvMain.
> if Assigned(TTreeNode(Sender).Data) then
> ShowMessage('Node ' + IntToStr(TUser(TTreeNode(Sender).Data).Id));
> end;
>
> I'm obviously doing something a bit daft, but can't work out what?
> Any input would be greatly received.
Mattias
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
