| |
|
|
| allô Frank
oui,je encore.... folgendes je lese de einem LV dans un d'autre Fichiers un alles ok qui Fichiers devoir seulement kopiert volonté si vous pas im zweiten LV déjà vorhanden sommes,c'est pourquoi nutze je qui funktion searchtext()
seulement si eh bien im ersten LV folgende Fichiers(seulement z.B.) 1HALLO.txt allô 2.txt allô.txt stehen et je cela ganze sans Berücksichtigung qui large/Kleinschreibung ins autre LV kopieren veux (soll so son,car je kopiere aus verschiedenen Dirs) ensuite bekomm je seulement alle 3 Fichiers si Je l' Suchstring dans Anführungszeichen mets. si ca so richtig ist,könntest Du cela peut-être pour so gens comment mich s'il te plaît dans qui Aider avec aufnehmen.
encore quoi...es volonté alle Cordes dans Großbuchstaben umgewandelt ausser es steht une numéro devant ou bien qui String steht dans Anführungszeichen
1test.txt bleibt so test.txt wird umgewandelt
et ici un Auszug aus dem Voir le texte source:
GetItemText(listview&,itemtexts#,0,Zähler&) text$=String$(itemtexts#,1) z&=Byte(itemtexts#,0) si z&= 160 GetFullPathName(addr(text$),512,itemtexts#,nurso#) t1$=String$(itemtexts#,0) let filename$=GetFileName(t1) let Pathfilename$=GetFilePath(t1$) so gehts es pas let such$=filename$ so ca va let such$=@chr$(34)+filename$+@chr$(34) y&=SearchText(listview2&,0,GetLines(listview2&),0,addr(such$),0,addr(x&))
let such$=@chr$(34)+ Pathfilename$ +@chr$(34) y2&=SearchText(listview2&,0,GetLines(listview2&),0,addr(such$),0,addr(x&))
si @or(@equ(y&,-1),@equ(y2&,-1)) seulement si pas vorhanden rein avec cela SetItem listview2&,filename$,Pathfilename$ endif endif
Salut Klaus |
|
|
| |
|
|
|
| Hiiilfeee !!! ist la fois wieder Quatsch quoi je geschrieben habe... Logisch..si Je l' String dans Anführungszeichen mets peux qui Funktion den oui pas trouver là il pas juste ist. avec cela wäre zwar cela Prob gelöst avec den Namensgleichheiten im Suchstring... ...mais eh bien bekomm je naturellement qui Cordes toujours wieder ins LV rein weil vous oui pas juste sommes
Thank you for Help un mittlerweile verzweifelter Klaus |
|
|
| |
|
|
|
| ok,je habs kapiert
so funktioniert es
let such$=filename$ y&=SearchText(listview2&,0,GetLines(listview2&),0,addr(such$),6,addr(x&))
si @equ(y&,-1) seulement si pas vorhanden rein avec cela SetItem listview2&,filename$,Pathfilename$ endif
einmal un Denkfehler beim chercher..car es suffisant la première Spalte zweitens un faute meinersteits chez den Parametern
mais es wird trozdem toujours alles dans Großbuchstaben umgewandelt ausser qui erste String ?? ist zwar pas important...voulez je seulement la fois dire
Salut...maintenant wieder quelque chose glücklicher Klaus |
|
|
| |
|
|
|
| Salut,
alles dans Großbuchstaben ? alors chez Je ne... Hab allerdings dernier Tage encore une Bug dans SearchText() trouvé et beseitigt, maintenant findet il aussi wirklich ALLE Vorkommen des Suchstrings. à cause de qui Großschreibung: s'il te plaît toujours un abgespecktes funktionierendes Testprogramm envoyons, dans dem qui faute vorkommt. seulement so peux je es aussi nachvollziehen, testen et notfalls den faute beheben. Fühl toi libre !
Salut, Frank |
|
|
| |
|
|
|
| allô Klaus,
une autre l'affaire: je peux toi momentan pas per EMail erreichen. mon Mails venons avec einem faute zurück...
Salut, Frank |
|
|
| |
|
|