@@ -183,31 +183,39 @@ Type
183183 PSDL_SysWMinfo = ^TSDL_SysWMinfo;
184184 TSDL_SysWMinfo = record
185185 version: TSDL_version;
186- subsystem: TSDL_SYSWM_TYPE;
187- { $IFDEF SDL_VIDEO_DRIVER_WINDOWS}
188- win : __WMINFO_WINDOWS;
189- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_WINRT}
190- winrt : __WMINFO_WINRT;
191- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_X11}
192- x11 : __WMINFO_X11;
193- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_DIRECTFB}
194- dfb : __WMINFO_DFB;
195- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_COCOA}
196- cocoa : __WMINFO_COCOA;
197- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_UIKIT}
198- uikit : __WMINFO_UIKIT;
199- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_WAYLAND}
200- wl : __WMINFO_WAYLAND;
201- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_MIR}
202- mir : __WMINFO_MIR;
203- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_ANDROID}
204- android: __WMINFO_ANDROID;
205- { $ELSE} { $IFDEF SDL_VIDEO_DRIVER_VIVANTE}
206- vivante: __WMINFO_VIVANTE;
207- { $ELSE}
208- (* Cannot have empty record case *)
209- dummy: integer;
210- { $ENDIF} { $ENDIF} { $ENDIF} { $ENDIF} { $ENDIF} { $ENDIF} { $ENDIF} { $ENDIF} { $ENDIF} { $ENDIF}
186+ case subsystem: TSDL_SYSWM_TYPE of
187+ { $IFDEF SDL_VIDEO_DRIVER_WINDOWS}
188+ SDL_SYSWM_WINDOWS: (win : __WMINFO_WINDOWS);
189+ { $ENDIF}
190+ { $IFDEF SDL_VIDEO_DRIVER_WINRT}
191+ SDL_SYSWM_WINRT: (winrt : __WMINFO_WINRT);
192+ { $ENDIF}
193+ { $IFDEF SDL_VIDEO_DRIVER_X11}
194+ SDL_SYSWM_X11: (x11 : __WMINFO_X11);
195+ { $ENDIF}
196+ { $IFDEF SDL_VIDEO_DRIVER_DIRECTFB}
197+ SDL_SYSWM_DIRECTFB: (dfb : __WMINFO_DFB);
198+ { $ENDIF}
199+ { $IFDEF SDL_VIDEO_DRIVER_COCOA}
200+ SDL_SYSWM_COCOA: (cocoa : __WMINFO_COCOA);
201+ { $ENDIF}
202+ { $IFDEF SDL_VIDEO_DRIVER_UIKIT}
203+ SDL_SYSWM_UIKIT: (uikit : __WMINFO_UIKIT);
204+ { $ENDIF}
205+ { $IFDEF SDL_VIDEO_DRIVER_WAYLAND}
206+ SDL_SYSWM_WAYLAND: (wl : __WMINFO_WAYLAND);
207+ { $ENDIF}
208+ { $IFDEF SDL_VIDEO_DRIVER_MIR}
209+ SDL_SYSWM_MIR: (mir : __WMINFO_MIR);
210+ { $ENDIF}
211+ { $IFDEF SDL_VIDEO_DRIVER_ANDROID}
212+ SDL_SYSWM_ANDROID: (android: __WMINFO_ANDROID);
213+ { $ENDIF}
214+ { $IFDEF SDL_VIDEO_DRIVER_VIVANTE}
215+ SDL_SYSWM_VIVANTE: (vivante: __WMINFO_VIVANTE);
216+ { $ENDIF}
217+ (* Ensure this union is always 64 bytes (8 64-bit pointers) *)
218+ SDL_SYSWM_UNKNOWN: (dummy: array [0 ..63 ] of Byte);
211219 end ;
212220
213221{ * Function prototypes *}
0 commit comments