chore: Auto-formatted Pascal files: frmResults.pas

This commit is contained in:
instarepo 2022-10-03 01:05:36 +02:00 committed by Nikolaos Georgiou
parent e69d79e4e4
commit f37803bd9a

View File

@ -202,8 +202,8 @@ begin
SendMessage(wnd, CB_GETLBTEXT, i - 1, Longint(@itemtext)); SendMessage(wnd, CB_GETLBTEXT, i - 1, Longint(@itemtext));
node2 := AddChild(node1, 'Item #' + IntToStr(i)); node2 := AddChild(node1, 'Item #' + IntToStr(i));
AddChild(node2, 'Text = ' + itemtext); AddChild(node2, 'Text = ' + itemtext);
AddChild(node2, 'Data = ' + IntToStr(SendMessage(wnd, AddChild(node2, 'Data = ' +
CB_GETITEMDATA, i - 1, 0))); IntToStr(SendMessage(wnd, CB_GETITEMDATA, i - 1, 0)));
end; end;
end; end;
end; end;