Egy pár kérdésre az információk megőrzése - adatbázisba
Egy pár kérdésre az információk megőrzése # 032; DataSet.
Nekem van egy probléma: nem tudom, hogyan kell tartani információt a DataSet „, és egy táblázatkezelő fájl etogo és nem kell elvégezni (azaz az adatbázis file * .gdb tudja olvasni, amit a program, de például a hozzáférés nem érti.) Csak. hogy kéri meg -, hogy letöltse a feljegyzés, majd mentse a már a szöveg, de végül is ez nem egy asztal, és a kódot a letöltés -. rossz, mert az információ az utolsó mező mindig írt egy új vonal, nem értem, hogy miért, és ha. tegye vtsykle a DataSource1.DataSet.Fields.Count + 1, a hibát, mondván, nem lehet nagyobb, numbe azokon a területeken, segítsen kérem:
Memo1.Clear;
DataSource1.DataSet.First;
miközben nem DataSource1.DataSet.Eof csinálni
kezdődik
s: = "";
i: = 0 DataSource1.DataSet.Fields.Count - 1 dos: = s + "" + DataSource1.DataSet.Fields [i] .AsString + "" + "";
ha 0 <> Hossz (ek), akkor
Törlés (s, hossz (s), 1);
Memo1.Lines.Add (s);
DataSource1.DataSet.Next;
Application.ProcessMessages;
végén;
ha SaveDialog1.Execute ezután kezdődik
Memo1.Lines.SaveToFile (SaveDialog1.FileName);
végén;
Nyisson meg egy egyszerű szöveges fájl, és dolgozni vele.
F1: TextFile
.
AssignFile (F1, "átnevezni");
Átírása (F1);
Hozzáfűzése (F1);
miközben nem DataSource1.DataSet.Eof csinálni kezdődik
s: = "";
i: = 0 DataSource1.DataSet.Fields.Count - 1 do s: = s + "" + DataSource1.DataSet.Fields [i] .AsString + "" + "";
//
WriteLn (F1, s);
végén;
Flush (F0);
CloseFile (F1);
Valami ehhez hasonló, ha valami elrontotta, lásd. Dock.
Nem, nem a karaktert, és nézek rendes Ward vagy byuloknotom vagy Eksele - mindenütt ugyanazt a trükköt. A sor karakter nem létezik. A Can még mind tsykl probléma?
By the way, van valami ötleted, hogy mit nem tud olvasni egy fájlt * .gdb hogy mi prog, mint Babe fájlt, és mindenféle változásokat, és a táblázat formájában.
Itt működik eljárást kimenetet egy fájlba Adatbázis - nincs átmenet az utolsó mező a következő sorban van.
eljárás SaveDSToFile;
var
F1: TextFile;
s: string;
i: integer;
kezdődik
AssignFile (F1, "átnevezni"); // írja a nevét és elérési útját a fájl
Átírása (F1);
Hozzáfűzése (F1);
DataSet.First;
miközben nem DataSet.Eof csinálni kezdődik
s: = "";
i: = 0 DataSet.Fields.Count - 1 do
s: = s + DataSet.Fields [i] .AsString + "";
WriteLn (F1, s);
DataSet.Next;
végén;
Flush (F1);
CloseFile (F1);
végén;
A * .gdb táblák nem kerülnek tárolásra táblázatos formában. Ki mondta ezt? Szeretne konvertnut * .gdb in * .mbd? Használd a datapump-én.
Mellesleg ez is lehet másképpen: nem változik a tartomány is, és az s karakterláncot. Itt etomu megjelent egy másik kérdés: hogyan illeszkedik a prog tsykl hogy helyébe két tér egy és végrehajtani, amíg a távolságok nem maradnak csak egy hely? Ez az, amit tettem:
AssignFile (F1, "átnevezni");
Átírása (F1);
Hozzáfűzése (F1);
miközben nem DataSource1.DataSet.Eof csinálni kezdődik
s: = "";
i: = 0 DataSource1.DataSet.Fields.Count - 1 do s: = s + "" + DataSource1.DataSet.Fields [i] .AsString + "";
i: = 1 hossza (s) tenni, ha s [i] = "", akkor s [i]: = "";
WriteLn (F1, s);
végén;
Flush (F1);
CloseFile (F1);
Ez nem oldja meg problshemy. Sajnos. És ha írsz a táblázatokban paradoxon, majd később ezeket a táblázatokat lehet olvasni Eksele? Ha nem tudja, akkor mondja meg, hogy hol kell írni az adatbázisban. Majd hozzon létre egy makrót a Word - Nem tudok, és az ügyfél azt mondta, hogy a táblázat szükséges.
Ha jól emlékszem, az Excel szól paradoksovskie bázis. És akkor próbálja ki magát -, és megtudja :)
és általában az ügyfél akar látni mindent egy táblázatban, sőt teszi magát IBExpert és obsmotritsya!
Nos, akkor hogyan, hogy az információk a DataSet „, és táblázatos formában? Azaz, mi lenne akkor a felhasználó minden gond nélkül olvasni ezt a gyönyörű Eksele fájlt. Én természetesen tsykl letölteni az adatokat az adatbázisból, és zaganyat ez a feljegyzés, de aztán ez lesz a szöveges információk, és szükséges, hogy egyszerre minden az asztalhoz ment, és hozzon létre egy táblázatból, hogy aztán olvasni Eksele vagy Acces. és akkor azt gondoltam korábban, hogy az ETIM problémák nem lesznek, gondoltam fájlok acces adatbázis és így értem ... By szati amit a IBExpert, és hogyan zajlik ?
Az ábrán származó információkat az adatbázisba?
Vegye EhLib (DBGridEh), akkor van egy funkciója adatokat exportálni formátumok txt, html, xls, rtf, csv, a Windows vágólapra. Mi nem csak az összes adat, például a (export funkció paraméter IGAZ / HAMIS) kiválasztása. Ha ezek az adatok importálásra, valamint a formázás (például ha a rács bakground sárga, zöld font, fejezetek és kék rács lila print).
A kilépés megkapja a kívánt formátumot oly módon, vygladel DBGrid során a programot, és hagyja magát Clint neki obsmotritsya.
Úgy gondolom, hogy az, hogy az új alkatrészek - rossz munkát. Miután az összes Excel fájlok olvasásához * .dbf megmondani, hogyan kell menteni az adatbázist Paradox nem ebben a formában * állományba. és a formátum * .dbf, majd a probléma megoldódik. By the way, csak a móka kedvéért, hol lehet letölteni DBGridEh, mindezt könyvtárban? Ez is része a CD-t Delphi?
Excel és alatt legalább XP ochchen még könnyen nyitható * .db
> Lehet etogo és nem kell tennie,
Talán így van? Még valószínűbb. 8-)
> Adatbázis file * .gdb tudja olvasni, amit a program
Még biztosan nem egy, akkor is az övé.
> De mint például az Access nem érti
És még tompa Oracle nem érti 8-)
> Az egyetlen dolog, amit javasolt - letölthető információkat az emlékeztetőt, majd mentse a szöveg már
Aki azt javasolta? Tehát akkor is letölthető az információkat - hogyan? A feljegyzés -, így ez a program az eszköz, ha egy emlékeztető összetevőt adunk? Aztán semmi, mint rács - táblázat, amely az ügyfél is tanúi első kézből, hogy mennyit szeretne.
Mi az általános probléma akkor? Te mit csinálsz? Miért rázza a régi byzy az egyikből a másikba, vagy akár valahol látni, mint egy tábla?
A mogyoró. Határozottan. )
Memória: 0,77 MB
Idő: 0.062 c