XPSE

Français

je travaille oui grad à XPSE V0.1.60, cette parst aussi qui Headerfiles et ersetzt Konstanten im Source très viel plus rapide comme qui XProfankompiler, liest qui Headerfiles mais aussi un à Structs trop erlernen et qui im Programme genutzten Structs trop überprüfen.

XPSE meckert à, cela ~enPrivileges dans qui Windows.Ph
Kompilieren Marque Séparation

AdjustTokenPrivileges(TokenHandle: THandle( = External(~enPrivileges(TokenHandle:,"",;
AdjustTokenPrivileges(TokenHandle: THandle( = External(~enPrivileges(TokenHandle:,"",

undeklariert ist. réellement ist es aussi pas deklariert.

Beide Deklarationen sommes IMHO faux traduit et pas XProfankompatibel.

Clipboard01.png	12 kB

Hochgeladen:	07.10.2006

Downloadcounter:
		Download

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

- page 1 -

aussi:
Kompilieren Marque Séparation

OffsetViewportOrgEx(DC: HDC( = External(~gdi32,"OffsetViewportOrgEx",;
OffsetWindowOrgEx(DC: HDC( = External(~gdi32,"OffsetWindowOrgEx",;
OffsetViewportOrgEx(DC: HDC( = External(~gdi32,"OffsetViewportOrgEx",;
OffsetWindowOrgEx(DC: HDC( = External(~gdi32,"OffsetWindowOrgEx"pre>

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

RGH

[quote-part:f3529e87d3=iF]XPSE meckert à, cela ~enPrivileges dans qui Windows.Ph[/quote-part:f3529e87d3]
Offensichtlich hat qui Automatik beim Übersetzen de Delphi pour *.ph quelques Besonderheiten pas beachtet. si je cela droite vois, sollte statt cette deux Zeilen une la ligne stehen:
Kompilieren Marque Séparation

!AdjustTokenPrivileges( = External(~advapi32,"AdjustTokenPrivileges",;

Salut
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

RGH

[quote-part:b184e1f39e=iF]aussi: ...[/quote-part:b184e1f39e]
là steht aussi légèrement trop viel. So ists richtig:
Kompilieren Marque Séparation

!OffsetViewportOrgEx( = External(~gdi32,"OffsetViewportOrgEx",;
OffsetWindowOrgEx( = External(~gdi32,"OffsetWindowOrgEx",;
OffsetViewportOrgEx( = External(~gdi32,"OffsetViewportOrgEx",;
OffsetWindowOrgEx( = External(~gdi32,"OffsetWindowOrgEx"pre>

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

[quote-part:dd1679d36a=iF]je travaille oui grad à XPSE V0.1.60, cette parst aussi qui Headerfiles et ersetzt Konstanten im Source très viel plus rapide comme qui XProfankompiler, liest qui Headerfiles mais aussi un à Structs trop erlernen et qui im Programme genutzten Structs trop überprüfen.
.[/quote-part:dd1679d36a]
Du devrait très puis huit donner, cela XPSE là rien falsches lernt...
Kompilieren Marque Séparation

BS_PU<<IKE = $1000;

Kompilieren Marque Séparation

SECURITY_ANONYMOUS = (Ord(~SecurityAnonymous) << 16);
SECURITY_IDENTIFICATION = (Ord(~SecurityIdentification) << 16);
SECURITY_IMPERSONATION = (Ord(~SecurityImpersonation) << 16);
SECURITY_DELEGATION = (Ord(~SecurityDelegation) << 16)pre>

Kompilieren Marque Séparation

CLIP_LH_ANGLES = (1 << 4);
CLIP_TT_ALWAYS = (2 << 4);
CLIP_EMBEDDED  = (8 << 4)re>

Kompilieren Marque Séparation

FF_DONTCARE   = (0 << 4);     { Don"t care or don"t know. }
FF_ROMAN      = (1 << 4);     { Variable stroke width, serifed. }
{ Times Roman, Century Schoolbook, etc. }
FF_SWISS      = (2 << 4);     { Variable stroke width, sans-serifed. }
{ Helvetica, Swiss, etc. }
FF_MODERN     = (3 << 4);     { Constant stroke width, serifed or sans-serifed. }
{ Pica, Elite, Courier, etc. }
FF_SCRIPT     = (4 << 4);     { Cursive, etc. }
FF_DECORATIVE = (5 << 4);     { Old English, etc.

Kompilieren Marque Séparation

STAMP_DESIGNVECTOR = $80000000 + Ord("d") + (Ord("v") << 8);
STAMP_AXESLIST = $80000000 + Ord("a") + (Ord("l") << 8);

peut-être verstehe je là aussi seulement irgendwas pas?

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

RGH

jusqu'à sur cela erste einzeilige Beispiel ist alles korrekte XProfan-Syntax. cela << est un korrekter Operator.
1 << 4 = 16 (qui 1 wird um 4 Bit à gauche déménagé.)

la première la ligne doit hingegen dans qui acte anders lauten: Aus PU<<IKE sollte wieder PUSHLIKE volonté. cela Konvertierungsprogramm hat aus dem Delphi-Operator SHL (ShiftLeft) den XProfan-Operator << gemacht. dedans eines Wortes était cela naturellement faux.

Salut
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

merci Roland.

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

wohin sommes mais cet Sachen deklariert???
[quote-part:96402d7fb6]
~Securityanonymous
~Securityidentification
~Securityimpersonation
~Securitydelegation
[/quote-part:96402d7fb6]

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

RGH

eh, tu as droite. qui sommes pas défini. Im Original WINDOWS.PAS handelte es sich um une Aufzählungstypen. So ist es richtig:
Kompilieren Marque Séparation

!
SECURITY_ANONYMOUS = (0 << 16);
SECURITY_IDENTIFICATION = (1 << 16);
SECURITY_IMPERSONATION = (2 << 16);
SECURITY_DELEGATION = (3 << 16)/pre>

Bien sûr pourrait statt (0 << 16) aussi une schlichte 0 là stehen, mais à cause de qui optique et Systematik ... ;)

Salut
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

[quote-part:41e8eb0c99]Du devrait très puis huit donner, cela XPSE là rien falsches lernt...[/quote-part:41e8eb0c99]
bof coutume je pas wirklich là cela apprendre oui chaque la fois aufs Neue geschieht, là il qui Headerfiles oui aussi chaque la fois aufs Neue einliest. Mir ist dabei un aus meiner Sicht très schnelles procéder gelungen quoi z.B . 6 Headerfiles dans (chez mir) à peine spührbarer Zeit einliest et dans den Source hineinverarbeitet.

cela entlastet den XProfanKompiler enorm, qui aus meiner Sicht longtemps Wartezeit qui qui Kompiler chez Headerfiles nécessaire fällt vollständig weg et qui XProfanKompiler bekommt seulement qui Deklarationen qui aussi verwendet volonté, et cela aussi encore vorgekaut.

07.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jac
de
Lad

MIR ist cela Ganze gar pas aufgefallen.

Werden qui korrigierten Versionen irgendwo bereitgestellt, ou bien muss sich cela chacun selbst changement?

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

08.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

RGH

[quote-part:f82c02c55e=Jacob Liebeck]MIR ist cela Ganze gar pas aufgefallen.

Werden qui korrigierten Versionen irgendwo bereitgestellt, ou bien muss sich cela chacun selbst changement?[/quote-part:f82c02c55e]
bien sûr wird chez XProfan 10 qui korrigierte Version dabei son!

Salut
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

08.10.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

- page 2 -

Jac
de
Lad

Toll, merci!