Personale/Chameleon
1
0
Fork 0
mirror of https://github.com/ngeor/Chameleon.git synced 2025-12-19 09:53:43 +01:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #3 from ngeor/instarepo_branch

Browse Source 
instarepo automatic PR
This commit is contained in:
Nikolaos Georgiou 2021-11-01 07:15:37 +01:00 committed by GitHub
commit 30ef83a1d2
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
frmMain.pas
View File

@ -132,7 +132,8 @@ begin
SendMessage(wnd, CB_GETLBTEXT, i - 1, longint(@itemtext));
node2 := AddChild(node1, 'Item #' + IntToStr(i));
AddChild(node2, 'Text = ' + itemtext);
AddChild(node2, 'Data = ' + IntToStr(SendMessage(wnd, CB_GETITEMDATA, i - 1, 0)));
AddChild(node2, 'Data = ' +
IntToStr(SendMessage(wnd, CB_GETITEMDATA, i - 1, 0)));
end;
end;
if childlist.Count > 0 then