summaryrefslogtreecommitdiff
path: root/src/corelib/x11/_netlayer.pas
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-10-05 12:59:49 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-10-05 12:59:49 +0000
commit6c72999051b20a306d7e40a55f5df5a48253799f (patch)
tree8afe8d755d2017bd662aa0c54bcf261cd53f4314 /src/corelib/x11/_netlayer.pas
parent433fbe8a1810882eda822e4cf4ccdefdbd8de959 (diff)
downloadfpGUI-6c72999051b20a306d7e40a55f5df5a48253799f.tar.xz
* Implemented a UTF8Insert() and UTF8Delete() procedures
* Fixed up TfpgEdit to now use the UTF-8 versions of Insert() and Delete() which fixes some of the keyboard input issue. * Removed stacks of compiler warnings all over the place. * Fixed up the TfpgMemo to now use the UTF-8 versions of Insert() and Delete() which fixes some of the keyboard input issues.
Diffstat (limited to 'src/corelib/x11/_netlayer.pas')
-rw-r--r--src/corelib/x11/_netlayer.pas6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/corelib/x11/_netlayer.pas b/src/corelib/x11/_netlayer.pas
index 724b6e4b..3eb5f326 100644
--- a/src/corelib/x11/_netlayer.pas
+++ b/src/corelib/x11/_netlayer.pas
@@ -284,7 +284,6 @@ procedure TNETWindowLayer.UpdateSupportedAtoms;
var
AtomCount: Integer;
Atoms: PNetAtom;
- Data: Pointer;
I: Integer;
NetAtom: TNetAtomEnum;
begin
@@ -306,6 +305,7 @@ end;
function TNETWindowLayer.WindowSetName(const AWindow: TWindow; AName: PChar
): Boolean;
begin
+ Result := True; //????
WindowSetPropertyUTF8(AWindow, FNetAtoms[naWM_NAME], Length(AName), AName);
end;
@@ -623,7 +623,7 @@ end;
function TNETWindowLayer.ManagerIsValid: Boolean;
begin
-
+ Result := False; // ????? Todo
end;
procedure TNETWindowLayer.SendRootWindowMessage(AMessage: PXEvent);
@@ -791,9 +791,7 @@ function TNETWindowLayer.WindowGetState(const AWindow: TWindow; out
var
AtomCount: Integer;
StateAtoms: PAtom;
- Data: Pointer;
I: Integer;
- State: TNetWindowState;
begin
Result := FAtomSupported[naWM_STATE];
if Result = False then Exit;