This forum is temporaily read-only. All existing discussions remain available for reference. For new questions, bug reports or support requests, please contact us at mail@lmdsupport.com.
TaskDialog is broken in 64-bit
This happens both in XE2 and XE3
ex:
var
theDialog: TLMDTaskDialog;
begin
theDialog := TLMDTaskDialog.Create(nil);
try
with theDialog do
begin
MainInstruction := "theMessage";
Title := "theCaption";
MainIcon := tdiInformation;
CommonButtons := [tdcbOk];
Execute;
end;
finally
theDialog.free;
end;
end;
ex:
var
theDialog: TLMDTaskDialog;
begin
theDialog := TLMDTaskDialog.Create(nil);
try
with theDialog do
begin
MainInstruction := "theMessage";
Title := "theCaption";
MainIcon := tdiInformation;
CommonButtons := [tdcbOk];
Execute;
end;
finally
theDialog.free;
end;
end;

Comments