Tutorial: Show Message Box fixen
Ich habe so eben ein Tutorial dazu erstellt. Das Tutorial findet ihr auch auf meiner Homepage
---
Problem:
Ihr tippt beim Maker einen Text in den Show Message Bereich ein. Oft ist der Text abgeschnitten und wenn ihr ein Faceset dazu benutzt, wird es auch komplizierter. Das muss nicht sein. Dieses Tutorial zeigt, wie ihr die Länge der Messagebox beim Maker richtig einstellen könnt.
Ihr braucht das Programm 'Resource Hacker' (kurz: ResHack), gibt es unter anderem hier.
1. Zuerst legt ihr am Besten ein Backup der rpg2000.exe oder rpg2003.exe an (funktioniert mit beiden).
2. Öffnet mit dem ResHack die rpg200(x).exe
und sucht dort den Eintrag:
- RC Data
- TFORMEVCMD10110
- 0
3. Löscht dort den ganzen Text des Scripts (markieren + entfernen) und ersetzt ihn durch folgenden:
inherited FormEvCmd10110: TFormEvCmd10110
Caption = 'Show Message'
ClientHeight = 133
ClientWidth = 682
OldCreateOrder = True
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object TabControl1: TTabControl
Left = 8
Top = 8
Width = 666
Height = 86
TabOrder = 0
TabStop = False
object FixedMemo1: TFixedMemo
Left = 8
Top = 7
Width = 650
Height = 70
Cursor = crIBeam
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
TabOrder = 0
OnChange = FixedMemo1Change
OnExit = FixedMemo1Exit
OnKeyDown = FixedMemo1KeyDown
OnMouseMove = FixedMemo1MouseMove
OnCancel = FixedMemo1Cancel
OnCtrlReturn = FixedMemo1CtrlReturn
end
object Line1: TOpaquePaintBox
Left = 276
Top = 12
Width = 1
Height = 50
Cursor = crIBeam
Opaque = True
Color = clAppWorkSpace
TabOrder = 1
OnMouseDown = LineMouseDown
OnPaint = LinePaint
end
object Line2: TOpaquePaintBox
Left = 360
Top = 12
Width = 1
Height = 50
Cursor = crIBeam
Opaque = True
Color = clBtnShadow
TabOrder = 2
OnMouseDown = LineMouseDown
OnPaint = LinePaint
end
end
object ButtonOk: TButton
Left = 241
Top = 100
Width = 89
Height = 25
Caption = '&Ok'
Default = True
ModalResult = 1
TabOrder = 1
OnClick = ButtonOkClick
end
object ButtonCancel: TButton
Left = 338
Top = 100
Width = 89
Height = 25
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 2
end
object ButtonHelp: TButton
Left = 435
Top = 100
Width = 89
Height = 25
Cancel = True
Caption = '&Help'
TabOrder = 3
OnClick = ButtonHelpClick
end
end
4. Speichert das ganze mit 'Compile Script' ab. Nun könnt ihr die veränderte rpg200(x).exe ebenfalls speichern und fertig.
