dOPC Client Toolkit
Close
Example
dOPCGUI.TdOPCGUI.DeleteItem
Copy Code
procedure
TForm1.cShowValueClick(Sender: TObject);
begin
if
cShowValue.Checked
then
//show value
begin
Edit1.Color := clWindow; OPCGUI.AddItem('test',ShowOPCItem,Edit1,'text');
//show value in edit
end
else
//don't show value
begin
Edit1.Color := clSilver; OPCGUI.DeleteItem(Edit1,'text');
//delete item
Edit1.Text := '';
//show nothing
end
;
end
;
Kassl GmbH Copyright © 2024. All rights reserved.