How to get text on custom html on uniLabel?
procedure TMainForm.UniFormCreate(Sender: TObject);
begin
UniLabel1.Caption :=
'<label for="exampleDataList" class="form-label">Datalist example</label>'#13 +
'<input class="form-control" list="datalistOptions" id="exampleDataList" placeholder="Type to search...">';
end;
i want to showmessege using this code, but got error.
procedure TMainForm.UniButton1Click(Sender: TObject);
var
FText : String;
begin
UniSession.JSCode('MainForm.FText.setValue(document.getElementById("exampleDataList").value);');
ShowMessage(FText);
end;