paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-05 20:38:08 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed compilation of apiwiz

Browse Source 
git-svn-id: trunk@5356 -
This commit is contained in:
mattias 2004-04-01 20:58:38 +00:00
parent 3ad2b1a32d
commit f74cebbd8e
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tools/apiwizz/apiwizard.pp
View File

@ -525,7 +525,7 @@ begin
PlatformPrefix := cbgLCLPlatform.Items[PlatformIdx];
PlatformDir := PlatformPrefix;
PlatformObject := 'T' + PlatformPrefix + 'WidgetSet';
PlatformObject[2] := UpperCase(PlatformObject[2]);
PlatformObject[2] := UpCase(PlatformObject[2]);
//------------------
// open *winapih.inc
@ -606,6 +606,9 @@ end.
{ =============================================================================
$Log$
Revision 1.7 2004/04/01 20:58:38 mattias
fixed compilation of apiwiz
Revision 1.6 2004/03/05 01:08:27 marc
* Updated for new WidgetSet names