घर
Top.Mail.Ru Yandeks.Metrika
मंच: "मुख्य";
वर्तमान संग्रह: 2002.01.08;
डाउनलोड करें: [xml.tar.bz2];

नीचे

फ़ाइल डाउनलोड करें! इसी तरह की शाखाएँ खोजें


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

Здраствуйте! Почему когда данный код записывает информацию в файл то там получается не qqqqqq а какойто глюк всякие вопросики черточки?
प्रक्रिया TForm1.Button3 क्लिक करें (प्रेषक: TObject);
var FileHandle: Integer;
एस: स्ट्रिंग;
शुरू करना
S:="qqqqqq";
FileHandle:=FileCreate("C:\q.txt");
FileWrite(Filehandle,S,sizeof(S));
FileClose (FileHandle);
अंत;



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

потому что string - указатель, Sizeof=4. Делай,например, так.
var f: टेक्स्टफाइल;
s: स्ट्रिंग;
शुरू करना
S:="qqqqqq";
AssignFile(f,"C:\q.txt");
पुनर्लेखन (एफ);
Writeln(F,S);
क्लोज़फ़ाइल (एफ);




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


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



पन्ने: 1 पूरी शाखा

मंच: "मुख्य";
वर्तमान संग्रह: 2002.01.08;
डाउनलोड करें: [xml.tar.bz2];

ऊपर









मेमोरी: 0.81 एमबी
समय: 0.036 c
3-21947
कट्टर
2001-12-05 13:18
2002.01.08
ओरेकल टेबल से एक इंडेक्स लिस्ट को पुनः प्राप्त करना


4-22509
करण
2001-11-08 12:50
2002.01.08
GetkeyboardState- क्या करता है?


1-22214
T2
2001-12-16 07:15
2002.01.08
बीएमपी 2 रिचएडिट


1-22105
Gonza
2001-12-19 16:35
2002.01.08
एमडीआई आवेदन ???


14-22342
गाढ़ा
2001-11-05 18:52
2002.01.08
प्रतियोगिता! खेल (साइट) सागर लड़ाई के लिए वॉलपेपर!





अफ्रीकी अल्बानियन अरबी भाषा अर्मेनियाई आज़रबाइजानी बस्क बेलारूसी बल्गेरियाई कैटलन सरलीकृत चीनी) चीनी पारंपरिक) क्रोएशियाई चेक डेनिश डच अंग्रेज़ी एस्तोनियावासी फिलिपिनो फिनिश फ्रेंच
गैलिशियन् जॉर्जियाई जर्मन यूनानी हाईटियन यहूदी हिंदी हंगरी आइसलैंड का इन्डोनेशियाई आयरिश इतालवी जापानी कोरियाई लात्वीयावासी लिथुआनियाई मेसीडोनियन मलायी मोलतिज़ नार्वेजियन
फ़ारसी पोलिश पुर्तगाली रोमानियाई रूसी सर्बियाई स्लोवाक स्लोवेनियाई स्पेनिश स्वाहिली स्वीडिश थाई तुर्की यूक्रेनी उर्दू वियतनामी वेल्श यहूदी बंगाली बोस्नियाई
सिबुआनो एस्पेरांतो गुजराती हौसा हमोंग ईग्बो जावानीस कन्नड़ खमेर लाओ लैटिन माओरी मराठी मंगोलियन नेपाली पंजाबी सोमाली तामिल तेलुगु योरूबा
ज़ुलु
Английский Французский Немецкий Итальянский Португальский Русский Испанский