ERFORDERLICHE OBJEKTE
2 CommandButtons (Command1, Command2)
FORM-CODE
Private Sub Command1_Click()
Me.Caption = LoadResString(1000)
End Sub
Private Sub Command2_Click()
Me.Caption = LoadResString(2000)
End Sub
Private Sub Form_Load()
Command1.Caption = "Deutsch"
Command2.Caption = "Englisch"
Call Command1_Click
End Sub
language.rc
STRINGTABLE DISCARDABLE
BEGIN
1000 "Das ist ein Beispiel"
2000 "This is a sample"
END
Diese Resourcen-Datei wird mit dem Zusatztool rc.exe kompiliert
und dem Projekt als Datei hinzugefügt.
Der Resourcen-Compiler ist dem Beispielprojekt beigefügt.
|