Avatar billede vallemanden Nybegynder
05. februar 2005 - 16:23 Der er 10 kommentarer og
1 løsning

Lægge 2 filer sammen

Hej

Jeg har 2 txt filer som jeg gerne vil have lagt sammen til 1 fil, så
fil 3.txt indeholder 1.txt og 2.txt
fil 3.txt indhold
'1.txt indhold
2.txt indhold'
Avatar billede arne_v Ekspert
05. februar 2005 - 16:40 #1
Du åbner vel den nye fil for skrivning, de to gamle filer for læsning
og så læser du først fra den ene gamle fil og derefter fra den anden
og skriver til den nye fil.
Avatar billede arne_v Ekspert
05. februar 2005 - 16:41 #2
God gammeldags assign, rewrite, reset, readln, writeln - jeg kan godt lave
lidt kode hvis det skulle være
Avatar billede vallemanden Nybegynder
05. februar 2005 - 16:49 #3
det må du gerne.

men jeg tænkte på om der ikke findes en commando til at gøre det. evt en 'dos' commando
Avatar billede arne_v Ekspert
05. februar 2005 - 16:51 #4
I DOS mener jeg at du bare kan:

copy 1.txt+2.txt 3.txt
Avatar billede vallemanden Nybegynder
05. februar 2005 - 16:55 #5
nej så bliver 3.txt = 2.txt
Avatar billede arne_v Ekspert
05. februar 2005 - 16:58 #6
Ikke på min PC !

C:\>type 1.txt
1a
1b

C:\>type 2.txt
2a
2b

C:\>copy 1.txt+2.txt 3.txt
1.txt
2.txt
        1 file(s) copied.

C:\>type 3.txt
1a
1b
2a
2b
Avatar billede vallemanden Nybegynder
05. februar 2005 - 17:43 #7
hmmm det gør det sq også på min nu, har nok tastet forkert før Sorry

men jeg kan ikke få det til at virke i delphi

      ShellExecute(MailerForm.Handle,
              nil,'copy 123.txt+test.txt try.txt',
              nil,
              nil,
              SW_SHOWNORMAL);
Avatar billede vallemanden Nybegynder
05. februar 2005 - 17:44 #8
try.txt bliver ikke oprettet
Avatar billede arne_v Ekspert
05. februar 2005 - 17:46 #9
Prøv:

ShellExecute(MailerForm.Handle,
              nil,'cmd /c copy 123.txt+test.txt try.txt',
              nil,
              nil,
              SW_SHOWNORMAL);
Avatar billede vallemanden Nybegynder
05. februar 2005 - 20:06 #10
kan ikke få det til at virke
Avatar billede martinlind Nybegynder
05. februar 2005 - 23:27 #11
Prøv sådan :

ShellExecute(MailerForm.Handle,nil,'cmd /c copy','123.txt+test.txt try.txt',
              nil,
              SW_SHOWNORMAL);
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester