Câteva întrebări privind păstrarea informațiilor de la # 032; DataSet.
Am o problemă: nu știu cum să păstreze informațiile din setul de date „și un fișier de calcul tabelar pot etogo și nu ar trebui să fie făcut (de exemplu, fișierul bază de date * .gdb poate citi ceea ce acest program, dar cum ar fi accesul nu înțelege.) Numai. care ma determinat - pentru a descărca informații de memo, și apoi salvați deja ca text, dar la urma urmei nu este o masă, și codul de download -. rău, deoarece informațiile din ultimul câmp este întotdeauna scris cu o nouă linie, eu nu înțeleg de ce și dacă. Pentru a pune în vyklele la DataSource1.DataSet.Fields.Count + 1 eroare, o pier este imposibil mare koliches în domeniile, vă rugăm să ajute:
Memo1.Clear;
DataSource1.DataSet.First;
în timp ce nu DataSource1.DataSet.Eof face
începe
s: = "";
pentru i: = 0 la DataSource1.DataSet.Fields.Count - 1 dos: = s + "" + DataSource1.DataSet.Fields [i] .AsString + "" + "";
dacă 0 <> Lungimea (ele) atunci
Ștergeți (s, lungimea (e), 1);
Memo1.Lines.Add (e);
DataSource1.DataSet.Next;
Application.ProcessMessages;
se încheie;
dacă SaveDialog1.Execute începe apoi
Memo1.Lines.SaveToFile (SaveDialog1.FileName);
se încheie;
Deschideți un fișier text simplu și lucrați cu el.
F1: TextFile
.
AssignFile (F1, "MyFile.txt");
Rescrie (F1);
Adăugați (F1);
în timp ce nu DataSource1.DataSet.Eof începe
s: = "";
pentru i: = 0 până la DataSource1.DataSet.Fields.Count - 1 do s: = s + "" + DataSource1.DataSet.Fields [i] .AsString + "" + "";
//
Writeln (F1, s);
se încheie;
Flush (F0);
CloseFile (F1);
Aproximativ, dacă ceva a fost încurcat, vezi docul.
Da, nu, nu există nici un simbol și mă uit la Vord obișnuit, sau Bublonot, sau Eksel - peste tot aceeași glumă. Nu există niciun caracter de alimentare cu linii acolo. Poate la fel în problema tsykle?
Apropo, aveți idei despre faptul că nu puteți doar să citiți fișierul * .gdb cu un fel de prog, deoarece există modificări în acest fișier și deja sub forma unui tabel.
Aici este o procedură de lucru pentru ieșirea setului de date într-un fișier - nu există tranziții ale ultimului câmp la o altă linie.
procedura SaveDSToFile;
var
F1: TextFile;
s: șir;
i: întreg;
începe
AssignFile (F1, "MyFile.txt"); // scrie numele și calea dorită la fișier
Rescrie (F1);
Adăugați (F1);
DataSet.First;
în timp ce nu DataSet.Eof începe
s: = "";
pentru i: = 0 la DataSet.Fields.Count - 1 face
s: = s + DataSet.File [i] .AsString + "";
Writeln (F1, s);
DataSet.Next;
se încheie;
Flush (F1);
CloseFile (F1);
se încheie;
În tabelele * .gdb nu sunt stocate într-o formă tabelară. Cine ți-a spus asta? Doriți să convertiți * .gdb la * .mbd? Utilizați datapump th.
Puteți face același lucru și într-un alt mod: modificați domeniul, nu domeniul în sine, ci sirul. De aceea există o altă întrebare: cum să scrieți un program pe programul dvs., astfel încât acesta să înlocuiască două spații pentru unul și să fie executat până când există doar un spațiu care trebuie lăsat să fie distanțat? Iată ce am făcut:
AssignFile (F1, "MyFile.txt");
Rescrie (F1);
Adăugați (F1);
în timp ce nu DataSource1.DataSet.Eof începe
s: = "";
pentru i: = 0 la DataSource1.DataSet.Fields.Count - 1 la s: = s + "" + DataSource1.DataSet.Fields [i] .AsString + "";
pentru i: = 1 la lungimea (s) face dacă s [i] = "" atunci s [i]: = "";
Writeln (F1, s);
se încheie;
Flush (F1);
CloseFile (F1);
Acest lucru nu rezolvă problemele. Din păcate. Și dacă scrieți în tabelele Paradox, atunci aceste tabele pot fi citite de Exxel? Dacă nu, atunci spune-mi unde merită să scrieți o bază de date. Apoi, creați o macrocomandă în Word - nu știu cum, iar clientul a spus că am nevoie de o masă.
Din câte îmi amintesc, Excel citește bazele Paradoxului. Și tu o încerci singur - și o să știi :)
și, în general, dorește ca clientul să vadă totul într-o formă tabelară, să se lase IBExpert și să se uite în jur!
Ei bine, atunci cum să păstreze informațiile din setul de date „și, sub formă de tabel? Cu alte cuvinte, ceea ce ar fi atunci utilizatorul poate fara probleme pentru a citi acest fișier frumos Eksele. Pot cu siguranță tsykl descărca informațiile din baza de date, și zaganyat-l în nota, dar apoi acest lucru va fi informația de text și este necesar ca dintr-o dată totul a mers la masă, și de a crea un fișier foaie de calcul care poate fi citit apoi Eksele sau Acces. și chiar și atunci m-am gândit înainte de asta cu probleme Etim nu va fi, m-am gândit fișiere baze de date Accesați și înțelegeți astfel ... Pentru a sati, ce este acest IBExpert și cât de mult este necesar ?
În FIG aveți informații din setul de date?
Ia EhLib (DBGridEh), are funcția de a exporta date la formatele txt, html, xls, rtf, csv, clipboard Windows. La ceea ce nu numai toate datele, dar de exemplu (parametrul funcției de export TRUE / FALSE) a fragmentului selectat. Datele sunt importate împreună cu formatul (de exemplu, dacă grila este galbenă, fontul este verde și antetele sunt albastre cu un font purpuriu).
Pe ieșire veți primi un fișier de formatul de care aveți nevoie în așa fel, încât DBGridd va fi netezit în timpul programului dvs. și vă veți lăsa să vedeți clintul pe el.
Cred că este o treabă proastă de a lua noi componente. După ce Excel citește fișierele * .dbf, spune-mi cum să salvez baza de date în Paradox nu în format * .db. dar în format * .dbf, iar apoi problema va fi rezolvată. Apropo, doar de dragul interesului, unde pot descărca DBGridEh, această întreagă bibliotecă? E în CD cu Delphi?
Excel, cel puțin XP, se deschide chiar foarte ușor * .db
> Poate și nu trebuie făcut
Poate așa? Chiar și cel mai probabil. 8-)
> fișierul de bază de date * .gdb poate fi citit de un anumit program
Chiar și cu siguranță nu unul, chiar tu poți.
> dar, de exemplu, Access nu înțelege
Și chiar un Oracle stupid nu va înțelege 8-)
> Singurul lucru care mi sa spus a fost să descarc informațiile de la MEMO și apoi să le salvez ca text
Cine a sugerat? Deci puteți să descărcați informații - cum? În MEMO - deci acesta este programul pe care îl ai atunci când adaugi componente? Apoi, decât nu-i place grilă - o masă pe care clientul dvs. o poate contempla cu propriile sale ochi orice număr.
Care este problema atunci? Ce faceți în general? De ce ar trebui să descarc informațiile de la unul la altul sau altceva pentru ao vizualiza într-o formă tabelară?
În căpșună. Cu siguranță. )
Memorie: 0.77 MB
Timp de timp: 0.062 sec