Topic: Script help please
Hi All...
Trying to prevent adding new record without selecting a treeview node. Could somebody correct the following script please?
procedure Form1_btnMainTaskADD_OnClick (Sender: string; var Cancel: boolean);
begin
If (Form1.TreeView4.RowCount > - 1) and (Form1.TreeView4.SelectedRow = False) then
Begin
MessageBox('Please select a Tree Node first.','Error',MB_OK+MB_ICONERROR);
Cancel := True;
Exit;
End;
end;
God... please help me become the person my dog thinks I am.