/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
FileWrite
Fra : Michael Vilhelmsen


Dato : 25-09-03 07:55

Hej

Jeg benytter mig af fil rutinerne i SysUtils.
En af dem er FileWrite.

Den kaldes med f.eks. FileWrite (Handle,WhatDoWrite,HowManyBytesToWrite)

Skriver jeg: FileWrite (MiTHandle,'Michael#13#10,9)
kommer der til at stå Michael + ny linie i filen.

Skriver jeg derimod:

lStr : String
begin
lStr := 'Michael'+#13#10;
FileWrite(MitHandle,lStr,Length(lStr))


Står der det rene volapyk (Men der er skrevet 9 tegn, som den skal).

Hvad gør jeg forkert ?

Michael



 
 
Lars Bargmann (25-09-2003)
Kommentar
Fra : Lars Bargmann


Dato : 25-09-03 14:34

Michael Vilhelmsen wrote:
> Hej
>
> Jeg benytter mig af fil rutinerne i SysUtils.
> En af dem er FileWrite.
>
> Den kaldes med f.eks. FileWrite (Handle,WhatDoWrite,HowManyBytesToWrite)
>
> Skriver jeg: FileWrite (MiTHandle,'Michael#13#10,9)
> kommer der til at stå Michael + ny linie i filen.
>
> Skriver jeg derimod:
>
> lStr : String
> begin
> lStr := 'Michael'+#13#10;
> FileWrite(MitHandle,lStr,Length(lStr))
>
>
> Står der det rene volapyk (Men der er skrevet 9 tegn, som den skal).
>
> Hvad gør jeg forkert ?
>
> Michael
>
>

Fuldstændig ud fra hukommelsen, ville jeg sige at du skulle typecaste
din string til en PChar... Er dog ikke sikker... Har ikke rørt
"FileWrite" i flere år...


lStr : String
begin
lStr := 'Michael'+#13#10;
FileWrite(MitHandle,PChar(lStr),Length(lStr))
end;


Bargmann.


Michael Vilhelmsen (25-09-2003)
Kommentar
Fra : Michael Vilhelmsen


Dato : 25-09-03 14:41

Jeps.

Takker.
Det hjalp

Michael
"Lars Bargmann" <lars@NOSPAMbargmann.dk> skrev i en meddelelse
news:bkuqrc$19m5$1@news.cybercity.dk...
> Michael Vilhelmsen wrote:
> > Hej
> >
> > Jeg benytter mig af fil rutinerne i SysUtils.
> > En af dem er FileWrite.
> >
> > Den kaldes med f.eks. FileWrite (Handle,WhatDoWrite,HowManyBytesToWrite)
> >
> > Skriver jeg: FileWrite (MiTHandle,'Michael#13#10,9)
> > kommer der til at stå Michael + ny linie i filen.
> >
> > Skriver jeg derimod:
> >
> > lStr : String
> > begin
> > lStr := 'Michael'+#13#10;
> > FileWrite(MitHandle,lStr,Length(lStr))
> >
> >
> > Står der det rene volapyk (Men der er skrevet 9 tegn, som den skal).
> >
> > Hvad gør jeg forkert ?
> >
> > Michael
> >
> >
>
> Fuldstændig ud fra hukommelsen, ville jeg sige at du skulle typecaste
> din string til en PChar... Er dog ikke sikker... Har ikke rørt
> "FileWrite" i flere år...
>
>
> lStr : String
> begin
> lStr := 'Michael'+#13#10;
> FileWrite(MitHandle,PChar(lStr),Length(lStr))
> end;
>
>
> Bargmann.
>



Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408924
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste