begin process at 2008 08 08 23:37:17
1 223 648 membres
406 nouveaux aujourd'hui
14 230 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : memo vers txt probleme [ Archives / Fichier / Disque ] (toubal_99)

memo vers txt probleme le 05/01/2006 22:03:12

toubal_99

voila
j'ai recupere lle contenue d'un fichier texte vers 2 memo en changenant une ligne pressise du memo1 pas une autre voila comment :

AssignFile(F,'C:\ProgDVB\SoftCam.Key');
Reset(F);
while  ( eof(F)= false )do
 begin
        Readln(F,txt);
        index:=index+1;
        memo.Lines.Insert(index,txt);
        if MidStr(txt,1,11)='V 007C00 01' then memo1.Lines.Insert(index,'V 007C00 01 '+cd)
                                                              else memo1.Lines.Insert(index,txt);                         end;
et apres ca je vais enrgistrer le contenue du memo1 dans le memme fichier texte voila comment:

AssignFile(F,'C:\ProgDVB\SoftCam.Key');
Reset(F);
Rewrite(F);
for i:=1 to index do begin
                               Writeln(F,(memo1.Lines.ValueFromIndex[i] ));
                              end;
CloseFile(F);
le problemme c que dans le fichier texte chaque ligne manque d'un caractere au debut voici un exemple :
au lieu d'avoir ca normalement :
N 7001   00 54C1FAB66C9D6808 ;Polsat 13°E
N 7001   01 79F56042FCEFE0E0 ;Polsat 13°E
N 7101   00 54C1FAB66C9D6808 ;Polsat 13°E
N 7101   01 79F56042FCEFE0E0 ;Polsat 13°E
N 4E01   00 BA3E87A2B6DA658E ;Dream TV 146°E
N 4E01   01 3D3D7E84E027BC27 ;Dream TV 146°E
N 4F01   00 BA3E87A2B6DA658E ;Dream TV 146°E
N 4F01   01 3D3D7E84E027BC27 ;Dream TV 146°E

g ca a la place :
 7001   00 54C1FAB66C9D6808 ;Polsat 13°E
 7001   01 79F56042FCEFE0E0 ;Polsat 13°E
 7101   00 54C1FAB66C9D6808 ;Polsat 13°E
 7101   01 79F56042FCEFE0E0 ;Polsat 13°E
 4E01   00 BA3E87A2B6DA658E ;Dream TV 146°E
 4E01   01 3D3D7E84E027BC27 ;Dream TV 146°E
 4F01   00 BA3E87A2B6DA658E ;Dream TV 146°E
 4F01   01 3D3D7E84E027BC27 ;Dream TV 146°E


comme vous le remarquer il manque le 'N' au debut de chaque ligne !!! comment corriger ca merci
http://1tik.free.fr


Re : memo vers txt probleme le 05/01/2006 22:24:39

jlen100
Membre Club
Réponse acceptée !
salut,
charge plutot le memo avec le la methode loadfromfile()
memo1.lines.loadfromfile('C:\ProgDVB\SoftCam.Key');
puis rechecher la ligne contenant
'V 007C00 01'
et sauvegarder avec savetofile()
memo1.lines.savetofile('C:\ProgDVB\SoftCam.Key');
@+
jlen

Re : memo vers txt probleme le 05/01/2006 23:32:01

toubal_99
merci beacoup c tres eficasse

http://1tik.free.fr

Re : memo vers txt probleme le 27/01/2006 21:23:10

dxh_master
et de lire un fichier text a un memo c'est possible??

Re : memo vers txt probleme le 27/01/2006 21:33:34

jlen100
Membre Club
pour charger un fichier text dans un memo
Memo1.lines.loadfromfile('nomdu fichier.txt);
@+
jlen



Classé sous : txt, index, tv, polsat, dream

Participer à cet échange

Pub



Appels d'offres

Snippets en rapport

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS