mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-20 10:59:07 +02:00
TaskDialog: add some comments about the meaning of parameters in the callback function for the Win32 WS code.
This commit is contained in:
parent
70a178c88e
commit
188b9b863d
@ -1691,10 +1691,21 @@ begin
|
|||||||
end;
|
end;
|
||||||
TDN_HYPERLINK_CLICKED:
|
TDN_HYPERLINK_CLICKED:
|
||||||
begin
|
begin
|
||||||
|
{
|
||||||
|
wParam: Must be zero.
|
||||||
|
lParam: Pointer to a wide-character string containing the URL of the hyperlink.
|
||||||
|
Return value: The return value is ignored.
|
||||||
|
}
|
||||||
|
//AUrl := Utf16ToUtf8(PWideChar(lParam)); <== can this be done safely and passed to OnUrlClicked if AUrls is a local variable here??
|
||||||
if IsConsole then writeln('ToDo: implement OnHyperlinkClicked');
|
if IsConsole then writeln('ToDo: implement OnHyperlinkClicked');
|
||||||
end;
|
end;
|
||||||
TDN_NAVIGATED:
|
TDN_NAVIGATED:
|
||||||
begin
|
begin
|
||||||
|
{
|
||||||
|
wParam: Must be zero.
|
||||||
|
lParam: Must be zero.
|
||||||
|
Return value: The return value is ignored.
|
||||||
|
}
|
||||||
if IsConsole then writeln('ToDo: implement TDN_NAVIGATED??');
|
if IsConsole then writeln('ToDo: implement TDN_NAVIGATED??');
|
||||||
end;
|
end;
|
||||||
TDN_TIMER:
|
TDN_TIMER:
|
||||||
@ -1725,6 +1736,15 @@ begin
|
|||||||
if Assigned(Dlg.OnExpand) then
|
if Assigned(Dlg.OnExpand) then
|
||||||
Dlg.OnExpand(Dlg);
|
Dlg.OnExpand(Dlg);
|
||||||
end;
|
end;
|
||||||
|
TDN_RADIO_BUTTON_CLICKED:
|
||||||
|
begin
|
||||||
|
{
|
||||||
|
wParam: An int that specifies the ID corresponding to the radio button that was clicked.
|
||||||
|
lParam: Must be zero.
|
||||||
|
Return value: The return value is ignored.
|
||||||
|
}
|
||||||
|
if IsConsole then writeln('ToDo: implement OnRadioButtonClicked');
|
||||||
|
end;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user