Avatar billede jetrit Nybegynder
28. februar 2002 - 14:41 Der er 9 kommentarer og
2 løsninger

text fil til Array

hej der.
er der nogen der kan sige mig hvordan jeg kan få læst en text fil ind i et array linie for linie?
Avatar billede hathor Nybegynder
28. februar 2002 - 14:45 #1
så vidt jeg ved kan du kun læse det op i streng.

Sådan her:

$nos = fopen("textfil.txt", "r");
while(!eof($nos){
$streng = fgets($nos, 4096);}

echo $streng.
Avatar billede martinlind Nybegynder
28. februar 2002 - 14:46 #2
A : array[1..200,1..255] of Char;
I : Integer;


I := 1;
while not eof(F) do
begin
  readLn(F,A[I][1]);
  Inc(I);
end;

Noget i denne stil

/Martin
Avatar billede hathor Nybegynder
28. februar 2002 - 14:46 #3
ahhhhhh ... deplhi!!!

Ups .. trode sq jeg var under PHP :-)
Avatar billede martinlind Nybegynder
28. februar 2002 - 14:47 #4
hathor >> Det er Delphi kode vi bruger her !!!
Avatar billede jetrit Nybegynder
28. februar 2002 - 16:08 #5
hvad skal der være ved F skal det være stien til filen eller hvordan får jeg loadet filen ind i F
Avatar billede Marting Forsker
28. februar 2002 - 16:31 #6
prøve det her!


Var
F : TextFile;
S : String;
i : integer;
Begin
    AssignFile(F, 'D:\nyfil');
  Reset(F);
  if not EOF(F) Then
  begin
    for i := 1 to 5 do
      ReadLn(F, S);
    vis := s;
  end;
  CloseFile(F)

Martin
Avatar billede Marting Forsker
28. februar 2002 - 16:32 #7
Vis :=s; skal ikke med

Martin
Avatar billede jetrit Nybegynder
28. februar 2002 - 16:54 #8
til Marting

tak det virker men hvordan ved jeg hvormange linier der i dokumentet
Avatar billede Marting Forsker
28. februar 2002 - 17:10 #9
prøve med det her

Var
F : TextFile;
S : String;
i : integer;

I=1;
Begin
    AssignFile(F, 'D:\nyfil');
  Reset(F);

  while not eof(F) do
    begin
      readLn(F,A[I][1]);
      Inc(I);
  end;
end;
  CloseFile(F)



Martin
Avatar billede Marting Forsker
28. februar 2002 - 19:08 #10
er der ikke  lidt  point til mig???

Martin
Avatar billede jetrit Nybegynder
28. februar 2002 - 19:56 #11
jeg var nød til at løbe ud af døren kl 17 men du skal nok få dine point mange tak for hjælpen

mvh jetrit
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