Domino 9 und frühere Versionen > ND8: Entwicklung
Declare Function xxx Lib "user32" crasht Linux- Client
(1/1)
Tode:
Ich habe eine Script- Library, die einige Funktionen wie oben deklariert.
Diese Deklarationen bringen (logischerweise) den Linux- Client zum Absturz.
Wie mache ich das, dass der diese Declarationen (und die entsprechenden Funktionen) nur ausführt, wenn ClientType = Windows?
Es handelt sich sowieso nur im Komfort- Funktionen, auf die die wenigen Linux- User dann halt verzichten müssten, bis ich einen Ersatz dafür gefunden habe...
Thanx
Tode
eknori:
Das Declare sollte keine Probleme bereiten. Allerdings wird der Aufruf der Funktion den Client crashen.
Du kannst die WIN relevanten Teile z.B. mit einem
If isDefined("WINDOWS") Then
... Code
else
... mach nix
end if
entsprechend ausklammern
Jeremias:
Und wenn Du dann OS-spezifische Funktionsaufrufe machen willst :
--- Code: ---Select Case s.Platform
Case "Windows/32":
'Aufruf der Windows-Funkton
Case "Macintosh":
'Aufruf der Mac-Funktion
Case "Linux":
'Aufruf der Linux-Funktion
Case Else : Messagebox "CTI-Funktion auf dieser Plattform nicht unterstützt."
End Select
--- Ende Code ---
Gruß
Axel:
Eventuell hilft dir auch %If weiter.
--- Code: ---Dim winTitle As String * 80
%If WIN16 ' 16-bit Windows
Dim activeWin As Integer ' Window handles are Integer.
Declare Function GetActiveWindow% Lib "User" ()
Declare Function GetWindowText% Lib "User" _
(ByVal hWnd%, ByVal lpstr$, ByVal i%)
%ElseIf WIN32 ' 32-bit Windows
Dim activeWin As Long ' Window handles are Long.
Declare Function GetActiveWindow& Lib "User32" ()
Declare Function GetWindowText% Lib "User32" _
Alias "GetWindowTextA" _
(ByVal hWnd&, ByVal lpstr$, ByVal i&)
%End If
--- Ende Code ---
Axel
Tode:
Danke für die Zahlreichen Tipps, bin gerade dran das mal auszuprobieren... Ich dachte, ich müsste die Declares schon verhindern, die anderen Sachen waren mir (zumindest Teilweise) bekannt...
Thanx
Tode
Navigation
[0] Themen-Index
Zur normalen Ansicht wechseln