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

* utf8bidi is only needed for implementation, please ensure it

Browse Source 
does not appear in any interface section except for LCLType.

git-svn-id: trunk@5912 -
This commit is contained in:
mazen 2004-09-02 14:59:55 +00:00
parent 7b4583e1bf
commit 0feb2a60d9
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/interfaces/gtk/gtkproc.pp
View File

@ -45,9 +45,6 @@ uses
{$ELSE} {$ELSE}
glib, gdk, gtk, {$Ifndef NoGdkPixbufLib}gdkpixbuf,{$EndIf} glib, gdk, gtk, {$Ifndef NoGdkPixbufLib}gdkpixbuf,{$EndIf}
{$ENDIF} {$ENDIF}
{$IFDEF USE_UTF8BIDI_LCL}
utf8bidi,
{$ENDIF}
LMessages, LCLProc, LCLStrConsts, LCLIntf, LCLType, DynHashArray, LMessages, LCLProc, LCLStrConsts, LCLIntf, LCLType, DynHashArray,
GraphType, GraphMath, Graphics, GTKWinApiWindow, LResources, Controls, Forms, GraphType, GraphMath, Graphics, GTKWinApiWindow, LResources, Controls, Forms,
Buttons, Menus, StdCtrls, ComCtrls, CommCtrl, ExtCtrls, Dialogs, ExtDlgs, Buttons, Menus, StdCtrls, ComCtrls, CommCtrl, ExtCtrls, Dialogs, ExtDlgs,
@ -759,6 +756,10 @@ procedure EndGDKErrorTrap;
implementation implementation
uses
{$IFDEF USE_UTF8BIDI_LCL}
utf8bidi;
{$ENDIF}
const const
VKEY_FLAG_SHIFT = $01; VKEY_FLAG_SHIFT = $01;