maison
Top.Mail.Ru Yandeks.Metrika
Forum: "Main";
Archive actuelle: 2002.01.08;
Télécharger: [xml.tar.bz2];

vers le bas

Télécharger le fichier! Trouver des branches similaires


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

Здраствуйте! Почему когда данный код записывает информацию в файл то там получается не qqqqqq а какойто глюк всякие вопросики черточки?
procédure TForm1.Button3Click (Sender: TObject);
var FileHandle: Integer;
S: chaîne;
commencer
S:="qqqqqq";
FileHandle:=FileCreate("C:\q.txt");
FileWrite(Filehandle,S,sizeof(S));
FileClose(FileHandle);
fin;



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

потому что string - указатель, Sizeof=4. Делай,например, так.
var f: fichier texte;
s: chaîne;
commencer
S:="qqqqqq";
AssignFile(f,"C:\q.txt");
Réécrire (f);
Writeln(F,S);
CloseFile (F);




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


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



Pages: 1 branche entière

Forum: "Main";
Archive actuelle: 2002.01.08;
Télécharger: [xml.tar.bz2];

à l'étage









Mémoire: 0.81 MB
Heure: 0.044 c
1-22215
VovaKomarov
2001-12-16 13:36
2002.01.08
mise à jour du client


1-22034
Alexey_K
2001-12-15 16:35
2002.01.08
Formulaire


14-22377
sudiv
2001-11-08 10:54
2002.01.08
C ++?


4-22500
Yus
2001-11-06 20:32
2002.01.08
Coordonnées de l'icône du bureau


3-21899
Yelchev
2001-12-03 10:26
2002.01.08
Accès rapide à la base de données ORACLE





afrikaans albanais Arabic arménien azerbaïdjanais basque Biélorusse Bulgare catalan Chinois simplifié) Chinois (traditionnel) croate Tchèque Danois Néerlandais English estonien Filipino Finlandais Français
galicien géorgien Allemand Grecque Créole haïtien hébreu Hindi Hongrois Islandais Indonesian irlandais Italien Japonais Coréen letton lituanien macédonien Malay maltais Norvégien
persan Polonais Portugais roumain Russe serbe Slovaque Slovène Espagnol Swahili Suédois Thai turc ukrainien Urdu vietnamien gallois yiddish bengali bosniaque
Cebuano espéranto gujarati Hause hmong Igbo Javanais Kannada Khmer lao latin maori Marathi mongol népalais punjabi somali tamil telugu yoruba
zoulou
Английский Français Allemand Italien Португальский Русский Espagnol