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

Para baixo

Escreva para o arquivo. Encontre agências semelhantes


Socol   (2001-12-15 17:14) [0]

Olá queridos senhores programadores!
Проблема я записываю информацию в файл там полючается какой то гон.
procedimento TForm1.Button1Click (Sender: TObject);
type t = record
Name:string[20];
Number:integer;
end;
vAR F:file of t;
A:t;
começar
AssignFile(F, "q.txt");
assignFile(F, "c:\q.txt") ;
rewrite(F);
write(F,A);
end;

procedimento TForm1.Button2Click (Sender: TObject);
var A:string;
começar
A := label1.caption
end;

+++ Como baixar desenho anêmico * .gif +++
Agradeço a todos que responderam!



Art   (2001-12-15 17:28) [1]

Убери первую строчку после begin и используй лучше writeln далее ,чему у тебя равно А при нажатии на кнопку 1???



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

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

em cima









Memória: 0.81 MB
Hora: 0.025 c
4-22485
Delphi5.01
2001-11-05 06:56
2002.01.08
Como posso carregar meu cursor no Delphi!


14-22368
Ouriço
2001-11-08 09:52
2002.01.08
Internet


1-22018
Delphig
2001-12-18 01:51
2002.01.08
Imprimir texto de Memo! Eu tenho algo errado ....


1-22254
facilidade
2001-12-17 13:32
2002.01.08
Arquivamento de dados


6-22266
PHN
2001-10-02 14:50
2002.01.08
Conectar





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