mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 10:39:18 +02:00
parent
051c6c7065
commit
1574149093
@ -2044,8 +2044,8 @@ end;
|
|||||||
|
|
||||||
destructor TCDEdit.Destroy;
|
destructor TCDEdit.Destroy;
|
||||||
begin
|
begin
|
||||||
inherited Destroy;
|
|
||||||
FLines.Free;
|
FLines.Free;
|
||||||
|
inherited Destroy;
|
||||||
//FCaretTimer.Free; Don't free here because it is assigned with a owner
|
//FCaretTimer.Free; Don't free here because it is assigned with a owner
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -13,10 +13,6 @@
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
// The version from FreePascal crash except in FPC 2.7.1+ from 10 Dec 2011 +
|
|
||||||
function XOpenIM(para1: PDisplay; para2: PXrmHashBucketRec; para3: Pchar; para4: Pchar): PXIM; cdecl; external;
|
|
||||||
function XCreateIC(para1: PXIM; para2: array of const): PXIC; cdecl; external;
|
|
||||||
|
|
||||||
procedure MyXConnectionWatchProc(display: PDisplay; client_data: TXPointer;
|
procedure MyXConnectionWatchProc(display: PDisplay; client_data: TXPointer;
|
||||||
fd: cint; opening: XLib.TBool; watch_data: PXPointer); cdecl;
|
fd: cint; opening: XLib.TBool; watch_data: PXPointer); cdecl;
|
||||||
begin
|
begin
|
||||||
|
Loading…
Reference in New Issue
Block a user