| |
| |
|
 | j'ai mich aujourd'hui l'après-midi sur qui Funktion Replace geärgert, là vous dans qui ProSpeed 2.6 (1) ne...aucune comme ErsatzString annahm (2) faute beim ersetzen machte.
Es kam ensuite une fette Fehlermeldung Exception EAccessViolation etc.
mais ensuite dachte je mir, lad je mir qui neue Version 2.7 runter et siehe là alle beide Probleme wunderbar gelöst. peut-être sommes cet Bugs wirklich déjà uralt, mais toutefois voudrais je mich chez Frank bedanken, weil es wirklich glücklich pouvoir, si on quelque chose zum marcher apporter peux:
cette Code fonctionne avec qui Version 2.6 pas:
=> avec qui 2.7 wunderbar!!!
KompilierenMarqueSéparationdeclare Dll_Prospeed&,SuchString$,ErsatzString$,LenSuchString&
declare LenErsatzString&,LenQuellBereich&,MultiEdit&
declare quelle#, ziel#
dim quelle#,100
dim ziel#,100
window 20,20-700,500
Dll_Prospeed& = UseDll("G:\Dll\ProSpeed.dll") ---Verzeichnis anpassen!
MultiEdit& = Create("MultiEdit",%HWnd,"",20,20,600,400)
Def CopyMemory(5) !"ProSpeed","CopyMemory"
Def Replace(7) !"ProSpeed","Replace"
print Ord("z")
String quelle#,0 = "[..][..][..][..]"
SetText MultiEdit&,String$(quelle#,0)
waitinput
SuchString$ = "[]"+"z"
---Der Ersatzstring bringt eine Fehlermeldung, wenn er nichts enthält :-(
ErsatzString$ = "_"+"z"
LenSuchString& = Len(SuchString$)
LenErsatzString& = Len(ErsatzString$)
LenQuellBereich& = SizeOf(quelle#)
Replace(quelle#,LenQuellBereich&,ziel#,addr(SuchString$),LenSuchString&,add
r(ErsatzString$),LenErsatzString&)
CopyMemory(ziel#,0,quelle#,0,LenQuellBereich&)
SetText MultiEdit&,String$(quelle#,0)
waitinput
dispose quelle#
dispose ziel#
| 24.04.2004 ▲ | |
|
| |
|
|
| Hi David,
> j'ai mich aujourd'hui l'après-midi sur qui Funktion Replace geärgert, là vous dans qui ProSpeed 2.6 (1) ne...aucune comme ErsatzString
> annahm (2) faute beim ersetzen machte.
> [...]
> mais ensuite dachte je mir, lad je mir qui neue Version 2.7 runter et siehe là alle beide Probleme wunderbar gelöst.
Stimmt, qui faute hatte mir Sven Bader déjà gemeldet et je hatte vous trop Beginn qui 2.7il réalisation behoben.
> merci Frank – tu es gleichzeitig un intellektuelles et soziales Genie: très gute Débutant/Fortgeschrittenen/Profi(?)-Tools
> avec Forum-Soutien et eh bien, cela aussi encore kostenlos – si je trop argent viens, ensuite werd je spenden
Na merci pour qui aufmunternen Worte !
là hoffe je doch, cela du vite zum Millionär wirst
Salut, Frank |
|
| |
| |
| |
|
(459)
Deutsch
English
Français
Español
Italia