| |
| |
|
Detlef
Jagolski | Profano2Cpp - Versión 1.5
Neues Projekt --->
Eingabe: D:Eigene DateienProfanSchneidplan_NeuSchneidplan.prf
Edición: D:Eigene DateienProfanSchneidplan_NeuSchneidplan_cpp
Binde Incluir-Archivos una... ok.
Lese Encabezamiento-Archivos... ok.
Überprüfe Syntax... ok.
Ersetze Encabezamiento-Definitionen... ok.
Erstelle Verzeichnisse... ok.
Übersetze... ok.
Erstelle PrfMain.cpp... ok.
Kopiere Encabezamiento... ok.
Kopiere Bibliotheken... ok.
Generiere Makefile... ok.
Projekt erfolgreich traducido! ¿Por qué erfolgreich, si la Code no se ejecuta????
[2681 Zeilen en 2078 ms]
C rogrammeDev-C++ing++.exe -c PrfMain.cpp -o .objPrfMain.o -ICrogrammeDev-C++include -ICrogrammeDev-C++includeg++ -fexceptions -s -mwindows -w -fvtable-thunks -fno-elide-constructors -LCrogrammeDev-C++lib -BCrogrammeDev-C++in
CrogrammeDev-C++ing++.exe -c Schneidplan.cpp -o .objSchneidplan.o -ICrogrammeDev-C++include -ICrogrammeDev-C++includeg++ -fexceptions -s -mwindows -w -fvtable-thunks -fno-elide-constructors -LCrogrammeDev-C++lib -BCrogrammeDev-C++in
Schneidplan.cpp: In function `struct p_variant proc_changemenuitem(int, ...):
Schneidplan.cpp:1283: `menu undeclared (first use this function)
Schneidplan.cpp:1283: (Each undeclared identifier is reported only once
Schneidplan.cpp:1283: for each function it appears en.)
Schneidplan.cpp:1283: parse error before `]
Schneidplan.cpp:1283: parse error before `]
Schneidplan.cpp:1283: parse error before `)
Schneidplan.cpp:1284: parse error before `]
Schneidplan.cpp:1284: parse error before `)
Schneidplan.cpp:1285: parse error before `]
Schneidplan.cpp:1285: parse error before `)
Schneidplan.cpp:1286: parse error before `]
Schneidplan.cpp:1286: parse error before `)
Schneidplan.cpp:1287: parse error before `]
Schneidplan.cpp:1287: parse error before `)
CrogrammeDev-C++inmake.exe: *** [.objSchneidplan.o] Error 1
Finished.
Was, como y wo muss Yo Cambio, el el Code se ejecuta???
Saludo
Detlef |
|
| |
| XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 17.12.2005 ▲ |
|
| |
|
|
 | Usted debe el Punto, welche falso konvertiert se, encontrar y aquí puesto - Yo glaube anders wäre lo muy schwierig herauszufinden qué a Deinem Code genau falso se traduce.
Yo glaube con un bisl Mithilfe se uno rápidamente determinar puede si de Ver código fuente oder al Konverter liegt. |
|
| |
| |
| |
|
|
Detlef
Jagolski | Hier una vez C++ y XProfan Code
KompilierenMarcaSeparaciónp_variant proc_changemenuitem(int n, ...)
{
BuildStack();
long lHmenu = LongParam(1);
long lPmenu = LongParam(2);
long lIndex = LongParam(3);
long lFont = LongParam(4);
_LM(pMenuiteminfo, 1) = SizeOf(_O((pMenuiteminfo)));
_LM(pMenuiteminfo, 2) = 0x20L | 0x10L | 2;
_LM(pMenuiteminfo, 10) = _P(pMenutext);
_LM(pMenuiteminfo, 11) = SizeOf(pMenutext);
External(_S("user32.dll"), _S("GetMenuItemInfoA"), 4, _L(lHmenu), _L(lPmenu), _L(0x400L), _L(_P(pMenuiteminfo)));
strcpy(_SM(pAMenudata[menu % ], 33), p_string(_P(pMenutext), 0L), _SIZE(pAMenudata[menu % ], 33));
_LM(pAMenudata[menu % ], 34) = lIndex;
_LM(pAMenudata[menu % ], 35) = External(_S("user32.dll"), _S("GetSubMenu"), 2, _L(lHmenu), _L(lPmenu));
_LM(pAMenudata[menu % ], 36) = lFont;
_LM(pAMenudata[menu % ], 3) = _LM(pMenuiteminfo, 3);
if (_LM(pMenuiteminfo, 3) == 0x800L)
{
_LM(pMenuiteminfo, 3) = 0x100L;
_LM(pMenuiteminfo, 2) = 0x20L | 0x10L;
_LM(pMenuiteminfo, 9) = _P(pAMenudata[_L(nMenu)]);
External(_S("user32.dll"), _S("SetMenuItemInfoA"), 4, _L(lHmenu), _L(lPmenu), _L(0x400L), _L(_P(pMenuiteminfo)));
}
else
{
_LM(pMenuiteminfo, 3) = 0x100L;
_LM(pMenuiteminfo, 2) = 0x20L | 0x10L;
_LM(pMenuiteminfo, 9) = _P(pAMenudata[_L(nMenu)]);
_LM(pMenuiteminfo, 10) = _P(pMenutext);
External(_S("user32.dll"), _S("SetMenuItemInfoA"), 4, _L(lHmenu), _L(lPmenu), _L(0x400L), _L(_P(pMenuiteminfo)));
}
nMenu++;
return _V(0Lspan>;
}
KompilierenMarcaSeparación
Proc ChangeMenuItem
Parámetros hMenu&, pMenu&, Index&, Font&
with MenuItemInfo#
.cbSize& = SizeOf(MenuItemInfo#)
.fMask& = ~MIIM_DATA | ~MIIM_TYPE | ~MIIM_ID
.dwTypeData& = MenuText#
.cch& = SizeOf(MenuText#)
endwith
~GetMenuItemInfo(hMenu&,pMenu&,~MF_BYPOSITION,MenuItemInfo#)
with MenuData#[Menu%]
.MenuText$ = String$(MenuText#,0)
.IconIndex& = Index&
.MenuPopUp& = ~GetSubMenu(hMenu&,pMenu&)
.MenuFont& = Font&
.fType& = MenuItemInfo#.fType&
endwith
If MenuItemInfo#.fType& = ~MFT_SEPARATOR
with MenuItemInfo#
.fType& = ~MFT_OWNERDRAW
.fMask& = ~MIIM_DATA | ~MIIM_TYPE
.dwItemData& = MenuData#[Menu%]
endwith
~SetMenuItemInfo(hMenu&,pMenu&,~MF_BYPOSITION,MenuItemInfo#)
Más
with MenuItemInfo#
.fType& = ~MFT_OWNERDRAW
.fMask& = ~MIIM_DATA | ~MIIM_TYPE
.dwItemData& = MenuData#[Menu%]
.dwTypeData& = MenuText#
endwith
~SetMenuItemInfo(hMenu&,pMenu&,~MF_BYPOSITION,MenuItemInfo#)
EndIf
Inc Menu%
ENDPROC
Saludo
Detlef |
|
| |
| XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 17.12.2005 ▲ |
|
| |
|
|
Michael
Dell | Hallole,
después de[quote:4cb2d33e67]Schneidplan.cpp: In function `struct p_variant proc_changemenuitem(int, ...):
Schneidplan.cpp:1283: `menu undeclared (first use this function)[/quote:4cb2d33e67]
a Urteilen debería el fehler hier mentira:
Statt:[quote:4cb2d33e67]Strcpy(_sm(Pamenudata[Menu % ], 33), ....[/quote:4cb2d33e67]que aquí:[quote:4cb2d33e67]Strcpy(_sm(Pamenudata[Menu% ], 33), ....[/quote:4cb2d33e67]
el Leerzeichen macht de Menu% una neue undeclarierte Variable, glaub Yo. |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 18.12.2005 ▲ |
|
| |
|
|
Sebastian
König | ¡Hola Detlef,
sorry - Yo el Contribución hier gerade sólo gesehen. Lo sieht así de, como käme Profano2Cpp con el Línea
With Menudata#[Menu%]
no está claro... Yo ya una Concepto, woran el mentira podría y voluntad veces nachsehen. Wahrscheinlich melde Yo mich entonces heute Abend otra vez.
MfG
Sebastian |
|
| |
| |
| |
|
|
Sebastian
König | así, Yo denke, Yo podría el problema encontrar y beheben - en me se el Code-Abschnitt nun korrekt traducido.
Yo sería Usted para Testen gern una neue Profano2Cpp.exe enviar (lo fue un Änderung a uno Función para Übersetzen de Variables-Namen nötig). An welche Adresse kann Yo Usted el eMail el senden?
MfG
Sebastian
P.S.: ach, benutzt Usted el Testversion o Vollversion de Profano2Cpp?  |
|
| |
| |
| |
|
|
 | ¡Hola Sebastian,
Por favor, a detlefjagolski@aol.com
y yo habe seit uno Semana una Vollversion.
Gracias y Saludo
Detlef |
|
| |
| |
| |
|
(948)
Deutsch
English
Français
Español
Italia