summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@gmail.com>2010-09-22 23:55:01 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-09-23 16:24:42 +0200
commit7e1fc68c8697935f4401cd4b0ac5484ba5245657 (patch)
treef0c4127822754b12636b4cddeabe2d619774c44b /src
parent92c712533d0f1270503f5db729c48e270bdb4b45 (diff)
downloadfpGUI-7e1fc68c8697935f4401cd4b0ac5484ba5245657.tar.xz
simple code formatting improvement
Diffstat (limited to 'src')
-rw-r--r--src/corelib/x11/fpg_x11.pas21
1 files changed, 11 insertions, 10 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas
index 39e139d8..e7a74db5 100644
--- a/src/corelib/x11/fpg_x11.pas
+++ b/src/corelib/x11/fpg_x11.pas
@@ -362,19 +362,20 @@ type
FMimeTypesArray: array of TAtom;
xia_plain_text: TAtom;
procedure InitializeMimeTypesToAtoms;
- procedure Dragging(ev: TXEvent);
- function IsDNDAware(win: TWindow): boolean;
- procedure SendDNDLeave(ATarget: TWindow);
- procedure SendDNDEnter(ATarget: TWindow);
- procedure SendDNDPosition(ATarget: TWindow; x_root: cint; y_root: cint; AAction: TAtom; ATime: X.TTime);
- procedure SendDNDDrop;
- procedure HandleDNDStatus(ATarget: TWindow; AAccept: integer; ARect: TfpgRect; AAction: TAtom);
- procedure HandleSelectionRequest(ev: TXEvent);
+ procedure Dragging(ev: TXEvent);
+ function IsDNDAware(win: TWindow): boolean;
+ procedure SendDNDLeave(ATarget: TWindow);
+ procedure SendDNDEnter(ATarget: TWindow);
+ procedure SendDNDPosition(ATarget: TWindow; x_root: cint; y_root: cint; AAction: TAtom; ATime: X.TTime);
+ procedure SendDNDDrop;
+ procedure HandleDNDStatus(ATarget: TWindow; AAccept: integer; ARect: TfpgRect; AAction: TAtom);
+ procedure HandleSelectionRequest(ev: TXEvent);
protected
FSource: TfpgX11Window;
- function GetSource: TfpgX11Window; virtual;
+ function GetSource: TfpgX11Window; virtual;
public
- function Execute(const ADropActions: TfpgDropActions; const ADefaultAction: TfpgDropAction = daCopy): TfpgDropAction; override;
+ destructor Destroy; override;
+ function Execute(const ADropActions: TfpgDropActions; const ADefaultAction: TfpgDropAction = daCopy): TfpgDropAction; override;
end;