Registriert seit: 23. Jul 2007
73 Beiträge
|
Re: Antikes Programm - alte Borland Units
24. Jul 2008, 15:53
Hallo Leute ich bin gerade einen entscheidenden Schritt weiter gekommen!!
Mittels des "Borland Resource Workshops" ist es mir gelungen, die vielen RES-Dateien (in denen die Forms drinnen sind) in RC-Dateien, die ja anscheinend normale Textdateien sind, umzuwandeln, was ca. so aussieht:
RATTRIBUTE DIALOG 35, 24, 332, 230
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
CAPTION "Rohr - Attribute"
FONT 8, "Helv"
{
CONTROL "COMBOBOX", 101, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 15, 21, 83, 58
EDITTEXT 102, 103, 21, 32, 14, ES_RIGHT | ES_MULTILINE | WS_BORDER | WS_TABSTOP
CONTROL "COMBOBOX", 103, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 173, 20, 147, 119
CONTROL "COMBOBOX", 104, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 12, 70, 143, 110
CONTROL "COMBOBOX", 105, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 182, 70, 47, 67
CONTROL "COMBOBOX", 106, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 257, 71, 47, 69
CONTROL "COMBOBOX", 107, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 13, 111, 56, 59
CONTROL "COMBOBOX", 108, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 94, 111, 47, 59
CONTROL "COMBOBOX", 109, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 176, 111, 108, 79
RADIOBUTTON "warmgefertigt", 110, 14, 151, 67, 10, BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP
RADIOBUTTON "kaltgefertigt", 111, 88, 151, 65, 10, BS_AUTORADIOBUTTON | WS_TABSTOP
CONTROL "COMBOBOX", 112, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_GROUP | WS_TABSTOP, 176, 149, 79, 50
CHECKBOX "kalibriert", 113, 12, 186, 52, 12, BS_AUTOCHECKBOX | WS_TABSTOP
CHECKBOX "profiliert", 114, 96, 185, 52, 12, BS_AUTOCHECKBOX | WS_TABSTOP
CHECKBOX "mit Endkappen", 115, 178, 186, 73, 12, BS_AUTOCHECKBOX | WS_TABSTOP
PUSHBUTTON "OK", 1, 108, 210, 55, 15, NOT WS_TABSTOP
PUSHBUTTON "Abbrechen", 2, 167, 210, 55, 15, NOT WS_TABSTOP
GROUPBOX "Bestellung in", -1, 4, 4, 158, 41, BS_GROUPBOX | WS_GROUP
GROUPBOX "Herstellungsverfahren", -1, 4, 134, 159, 34, BS_GROUPBOX
GROUPBOX "Kalibrierung", -1, 4, 170, 79, 35, BS_GROUPBOX
GROUPBOX "Lieferzustand", -1, 166, 4, 161, 41, BS_GROUPBOX
GROUPBOX "Profilierung", -1, 86, 170, 77, 35, BS_GROUPBOX
GROUPBOX "Prüfklasse/kategorie", -1, 4, 96, 82, 35, BS_GROUPBOX
GROUPBOX "Gütegrad", -1, 89, 96, 73, 35, BS_GROUPBOX
LTEXT "[m]", -1, 138, 23, 16, 12, NOT WS_GROUP
GROUPBOX "Durchmesser", -1, 173, 57, 71, 31, BS_GROUPBOX
GROUPBOX "Ausführungsart und Aussehen der Oberfläche", -1, 4, 46, 158, 48, BS_GROUPBOX
GROUPBOX "Wanddicke", -1, 248, 57, 73, 31, BS_GROUPBOX
GROUPBOX "ISO-Toleranzklasse", -1, 166, 46, 161, 48, BS_GROUPBOX
GROUPBOX "Form der Schweißfuge nach DIN 2559", -1, 167, 96, 161, 35, BS_GROUPBOX
GROUPBOX "Lieferart (Gewinderohre)", -1, 167, 134, 161, 34, BS_GROUPBOX
GROUPBOX "Endkappen", -1, 167, 170, 161, 35, BS_GROUPBOX
}
Interessanterweise gehen die RC-Dateien mit Delphi2006 auf, was im mir Hoffnungen weckt...
Kann man die RC-Dateien eigentlich automatisch in DFM-Dateien umwandeln? Gibt' es da vielleicht irgendein Tool?
Andernfalls würde ich mir eventuell - wenn es wirklich sein muss -etwas schreiben, um die vielen RC-Dateien zu parsen und in dfm-Dateien umzusetzen...
Viele Grüße,
Helmut
|