Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Upload de arquivo! Encontre agências semelhantes


Socol   (2001-12-18 08:54) [0]

Olá! Por que quando esse código grava informações em um arquivo, então não ocorre qqqqqq, mas algum tipo de falha de todos os tipos de perguntas?
procedimento TForm1.Button3Click (Sender: TObject);
var FileHandle: Inteiro;
S: string;
começar
S: = "qqqqqq";
FileHandle: = FileCreate ("C: \ q.txt");
FileWrite (Filehandle, S, sizeof (S));
FileClose (FileHandle);
end;



MBo   (2001-12-18 09:00) [1]

porque string é um ponteiro, Sizeof = 4. Faça isso, por exemplo.
var f: textfile;
s: string;
começar
S: = "qqqqqq";
AssignFile (f, "C: \ q.txt");
Reescreva (f);
Escrita (F, S);
CloseFile (F);




Mick   (2001-12-18 09:29) [2]

FileWrite (FileHandle, S [1], Comprimento (S))



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima









Memória: 0.55 MB
Hora: 0.038 c
1-22091
Mikhalyov Dmitry
2001-12-19 16:02
2002.01.08
pergunta de pascal


14-22343
Esmerilhão
2001-11-02 14:17
2002.01.08
Com uma risada, quase caí no chão!


1-22157
Flagman
2001-12-20 13:55
2002.01.08
Encontre dois retornos de carro em uma fileira.


4-22479
Vitas
2001-11-02 21:08
2002.01.08
Ajude a minimizar meu programa na bandeja do sistema


1-22062
Alexander
2001-12-19 00:17
2002.01.08
Como adiciono N dias a uma data específica (TDateTime)?





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russa sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol