version 2004 (Modified)
Compatibility Note
This command is maintained only for compatibility reasons. In new databases (created with 4D starting with version 2004), the platform interface is managed automatically by the program and the command has no effect. It can still be used in converted database, although it is recommended to activate the new interface management feature in the Preferences dialog box ("System" option).
SET PLATFORM INTERFACE (interface)
Parameter | Type | Description | |
interface | Number | New platform interface setting: | |
-1 Automatic | |||
0 Mac OS 7 | |||
1 Windows 3.11, NT 3.51 | |||
2 Windows 9x | |||
3 Mac OS 9 | |||
4 Mac Theme |
Description
The SET PLATFORM INTERFACE command sets the platform interface used for displaying the forms.
You can pass in interface one of the following predefined constants:
Constant | Type | Value |
Automatic Platform | Long Integer | -1 |
Mac OS 7 | Long Integer | 0 |
Windows 3.11, NT 3.51 | Long Integer | 1 |
Windows 9x | Long Integer | 2 |
Mac OS 9 | Long Integer | 3 |
Mac Theme | Long Integer | 4 |
Note: The constant Mac Theme allows you to use the user interface defined with the Appearance Manager. This manager only exists on Mac OS. When a database defined with "Mac Theme" interface is displayed on Windows, the interface "Windows 9x" is applied.
The command does nothing if the value you pass does not change the current platform interface.
Note: The platform interface can also be changed in the Preferences dialog box.
Example
In a 4D Client/Server architecture, the Macintosh and Windows stations can use different platform interfaces concurrently. To do so, you can call the SET PLATFORM INTERFACE command in the On Startup Database Method:
` This example assumes that user preferences are stored in a [Preferences] table ` Look for the record corresponding to the current user QUERY([Preferences];[Preferences]User name=Current User) If (Records in selection([Preferences])=0) ` If not found, look for the default preferences QUERY([Preferences];[Preferences]User name="Default") End if ` Set the Platform Interface according to the user preferences SET PLATFORM INTERFACE ([Preferences]Platform Interface)
See Also