Howdy, Stranger!
It looks like you're new here. If you want to get involved, click one of these buttons!
Categories
In this Discussion
- Eugene Balabuev (LMD) October 2016
- Tony Amos October 2016
JSDialog: Expanded text not visible
There has been an issue for quite a while where JSDialog does not show the expanded text.
Create a form with a button and add this code to the button click event:
var
JSDialog1: TJSDialog;
begin
JSDialog1 := TJSDialog.Create(nil);
try
JSDialog1.Expando.HideText := 'Collapse Dialog';
JSDialog1.Expando.Lines.Clear;
JSDialog1.Expando.Lines.Add('Expanded text goes here');
JSDialog1.Expando.ShowText := 'Expand Dialog';
JSDialog1.Expando.Visible := True;
JSDialog1.Header.Icon := tdiWarning;
JSDialog1.Instruction.Text := 'Instruction';
JSDialog1.Name := 'JSDialog1';
JSDialog1.Title := 'Warning';
JSDialog1.Execute;
finally
JSDialog1.Free;
end
end;
Note that it does not display the expanded text.
Comments