Ukladani a nahravani StringGridu – Delphi – Fórum – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu
Reklama
Reklama

Ukladani a nahravani StringGridu – Delphi – Fórum – Programujte.comUkladani a nahravani StringGridu – Delphi – Fórum – Programujte.com

 

Hledá se programátor! Plat 1 800 € + bonusy (firma Boxmol.com)
Syny
~ Anonymní uživatel
4 příspěvky
4. 5. 2009   #1
-
0
-

zdravim, mam tabulku StringGrid ktera obsahuje nejaka cisla, jak mam udelat abych tabulku ulozil do souboru? je jedno jak bo do jakeho formatu ale aby se dala ta data posleze nahrat zpet. predem diky za odpoved.

Nahlásit jako SPAM
IP: 195.47.12.–
Reklama
Reklama
joudicek0
Návštěvník
5. 5. 2009   #2
-
0
-

No pokud StringGrid nema metodu SaveToFile, jakoze asi nema, tak si budes muset napsat vlastni funkci, ktera to ulozi a pak druhou, ktera data zase nahraje.....

Format souboru bych asi zvolil:

pocetRadku
pocetSloupcu
radek1 - Slopec1 sloupec2 sloupec3 sloupec4
radek2 - sloupec1 ....

Nevim jestli jsem ti pomohl, ale pokud ne tak napis a budem pokracovat :)

Nahlásit jako SPAM
IP: 212.20.106.–
Syny
~ Anonymní uživatel
4 příspěvky
5. 5. 2009   #3
-
0
-

To joudicek : No díky ale ete estli bys mi poradil trochu s tou funkcí sem precejen trochu zacatecnik.Dik

Nahlásit jako SPAM
IP: 195.47.12.–
MiMi
~ Anonymní uživatel
45 příspěvků
5. 5. 2009   #4
-
0
-

zeby sa s tym dalo pracovat ako s maticou...

Nahlásit jako SPAM
IP: 217.145.198.–
Syny
~ Anonymní uživatel
4 příspěvky
5. 5. 2009   #5
-
0
-

To MiMi : rikam ze sem zacatecnik takze si mi jako moc neporadil

Nahlásit jako SPAM
IP: 195.47.12.–
MiMi
~ Anonymní uživatel
45 příspěvků
5. 5. 2009   #6
-
0
-

for i:=1 to ColCount do

for j:=1 to RowCount do
writeln(subor,StringGrid1.Cells[i,j]);

Nahlásit jako SPAM
IP: 217.145.198.–
MiMi
~ Anonymní uživatel
45 příspěvků
5. 5. 2009   #7
-
0
-

for i:=1 to ColCount do
for j:=1 to RowCount do
writeln(subor,StringGrid1.Cells[i,j]);

Nahlásit jako SPAM
IP: 217.145.198.–
MiMi
~ Anonymní uživatel
45 příspěvků
5. 5. 2009   #8
-
0
-

Prechadzas tym ako dvojrozmernym polom ColCount je pocet stlpcov a RowCount je pocet riadkov

Nahlásit jako SPAM
IP: 217.145.198.–
joudicek0
Návštěvník
6. 5. 2009   #9
-
0
-

Pisu to z hlavy, budou v tom chyby....



const cesta = '.\\StringGrid.txt';


Procedure ulozSG(var SG:TStringGrid);
var Col,row,i,j:integer;
f:Text;
begin

Col := SG.ColCount;
row := SG.RowCount;

Assign(f,cesta);
Rewrite(f);

Writeln(f,Col);
WriteLn(f, row);

for(i:= 0 to Row) do {muze byt chyba, nejsem si jistej jestli SG ma cislovany radky a sloupce od 0}
begin
for k:= 0 to Col do
begin
Writeln(f,SG.Cells[j][i]); {na kazdy radek jedna polozka....}
end;
end;

close(f);
end;


procedure nactiSG(var SG:TStringGrid);
var f:Text;
Col,Row,i,j:integer;
begin
Assign(f,cesta);
reset(f);

Readln(f,Col);
ReadLn(f,Row);

SG.ColCount := Col;
SG.RowCount := Row;

for i:= 0 to row do begin
for j:= 0 to col do begin
ReadLn(SG.Cells[j][i])
end;
end;

Close(f);
end;


Snad by to mohlo fungovat.....jak jsem napsal nahore ten format souboru, tak ten by asi nesel pouzit, mi nejak nedoslo, ze pokud ve stringridu budou vety, tak by to asi nefungovalo kvuli mezeram.... Pro jednotlive retezce a cisla by fungoval....

Nahlásit jako SPAM
IP: 212.20.106.–
Syny
~ Anonymní uživatel
4 příspěvky
14. 5. 2009   #10
-
0
-

jj diky moc, je tam par chybek ale jen s touhle si nevim rady -

f:text;

[Error] Unit1.pas(82): Constant or type identifier expected

Nahlásit jako SPAM
IP: 195.47.12.–
joudicek0
Návštěvník
15. 5. 2009   #11
-
0
-

To Syny : Zkus tam dat misto text, TextFile .....

Nahlásit jako SPAM
IP: 212.20.106.–
Zjistit počet nových příspěvků

Přidej příspěvek

Toto téma je starší jak čtvrt roku – přidej svůj příspěvek jen tehdy, máš-li k tématu opravdu co říct!

Ano, opravdu chci reagovat → zobrazí formulář pro přidání příspěvku

×Vložení zdrojáku

×Vložení obrázku

Vložit URL obrázku Vybrat obrázek na disku
Vlož URL adresu obrázku:
Klikni a vyber obrázek z počítače:

×Vložení videa

Aktuálně jsou podporována videa ze serverů YouTube, Vimeo a Dailymotion.
×
 
Podporujeme Gravatara.
Zadej URL adresu Avatara (40 x 40 px) nebo emailovou adresu pro použití Gravatara.
Email nikam neukládáme, po získání Gravatara je zahozen.
-
Pravidla pro psaní příspěvků, používej diakritiku. ENTER pro nový odstavec, SHIFT + ENTER pro nový řádek.
Sledovat nové příspěvky (pouze pro přihlášené)
Sleduj vlákno a v případě přidání nového příspěvku o tom budeš vědět mezi prvními.
Reaguješ na příspěvek:

Uživatelé prohlížející si toto vlákno

Uživatelé on-line: 0 registrovaných, 23 hostů

Podobná vlákna

Tisl Stringgridu — založil Hejnator

Z Listboxu do StringGridu — založil Veru

Načítání do Stringgridu — založil Hejnator

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032016 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý