XProfan

Español

Jürgen
Egener

Bueno Tag a todos Comunidad-Teilnehmer,

seit Monaten bin Yo (Programmier-Principiante) en el Búsqueda después de uno IDE con el uno(n) simplemente DLL redactar kann.
Profano = Programmieren für Anfänger.

Für el Freeware-Programa Roulette-Tester möchte Me gusta DLL para propio Testzwecke redactar.

[...]

Zitat: Offene Schnittstelle: Programmierer puede propio Systeme como DLL entwickeln y el Tester auswerten. Beispielquelltext en Delphi es enthalten.

Desde que en NULL anfange sería Yo mich freuen, si una Mitglied de diesem
Foro bereit wäre, irgend una kleine DLL para dieses o.g. Programa con (X)Profano
a redactar. Dies wäre para mich DIE Bestätigung con XProfan a beginnen.

Vielen Dank.
Jürgen

"Bewusstes Kommunizieren zwischen Menschen setzt voraus, dass sie das »Unbewusste« miteinander gemein haben."
Pierre Bourdieu (1930-2002)

29.10.2005 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Schau veces: [...]

Salve.

29.10.2005 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

Nur veces así como Einwurf, IF, puede ser con XProfan ünberhaupt DLL redactar? Meines Erachtens va el doch no????????

Jac

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

29.10.2005 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

XProfan alleine kanns todavía no aber con XProfan en Verbindung con Prf2Cpp

puede ser DLL exportieren ebenso como con XProfan y XPIA.

Salve.

29.10.2005 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Frank
Abbing

Hi,

hier veces una Minimalbeispiel uno Dll con (X)Profano & XPIA. Übrigens puede Dlls ya de Profano 5 producido voluntad. El integrierten Dlls direkt en el Profansource son aber sólo de XProfan nutzbar.
Kompilieren Marca Separación

 {$cliq}
Declare x&,y&,z&
x&=111
y&=222

AsmStart Funktionsname

    Parameters x&,y&
    mov eax,para1
    add eax,para2
    Return z&

AsmEnd

Cls
Print z&
WaitInput
End

Das Programa son ahora 333 de.
Der Source, el XPIA producido, y el el Dll eingebettet es, sieht entonces así de:
Kompilieren Marca Separación

DECLARE XPIA_#,XPIA$,EXPIA&,X&,Y&,Z&
DIM XPIA_#,1536
CLEAR XPIA_#
LONG XPIA_#,0=9460301,3,4,65535,184,0,64,0,0,0,0,0,0,0,0,176,247078670,-855002112,1275181089,1750344141,1881174889,1919381362,1663069537,1869508193,1700929652,1853190688,544106784,542330692,1701080941,168627502,36,0,-564840227
LONG XPIA_#,132=-1925490279,-1925490279,-1925490279,-1926661787,-1925490280,-1926740457,-1925490273,1751345490,-1925490279,0,0,17744,131404,1130615166,0,0,554565856,201654539,512,512,0,4164,4096,8192,268435456,4096,512,4,0,4
LONG XPIA_#,252=0,12288,512,0,2,1048576,4096,1048576,4096,0,16,4432,80,4344,40,0,0,0,0,0,0,8192,44,0,0,0,0,0,0,0,0,0,0,0,0,4096,8,0,0,0,0,0,0,1297301837,12851,416,4096,512,512,0,0,0,-536870880,1818587694,25455,48,8192,512,1024
LONG XPIA_#,488=0,0,0,1107296320,0,0,4392,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-1192457387,1,836297,-1679290518,-1962934272,144902213,-1961885680,212012101,-1961885680,279121989,-1961885680,346231877,-1961885680,413341765,-1961885680
LONG XPIA_#,640=480451653,-1961885680,547561541,-1961885680,614671429,-1961885680,681781317,-1961885680,748891205,-1961885680,816001093,-1961885680,883110981,-1961885680,950220869,-1961885680,1017330757,-1961885680,1084440645
LONG XPIA_#,716=-1022361584,-2081649835,1170734276,764,-9508864,144834559,51380240,1051653,146983184,637520896,268439552,4384,0,0,4406,4096,0,0,0,0,0,4392,0,1699152177,1937331060,1869377347,1937047666,842232421,1819042862,0,0
LONG XPIA_#,840=0,0,0,1130615166,0,4482,1,1,1,4472,4476,4480,4304,4498,1398734848,1701866857,1852137324,1818504808,1967521900,1769237358,1853058671,6647137,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,4096,44,811806811,812855403
LONG XPIA_#,1040=813903995,814952587,816001179,817049771,818098363,820195531,821309673,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
LONG XPIA_#,1344=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
XPIA$=$TEMPDIR+/_Simpel_enh.dll
FILEMODE 1
ASSIGN #1,XPIA$
OPENRW #1
BLOCKWRITE #1,XPIA_#,0,1536
CLOSERW #1
DISPOSE XPIA_#
X&=111
Y&=222
Z&=EXTERNAL(XPIA$,Funktionsname,X&,Y&)
CLS
PRINT Z&
WAITINPUT
FIN