![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ini-файл [D7, XP]
Star dust © (2006-10-28 15:42:00)у меня в программе есть языковые ini-файлы. Нужно чтобы данные из языкового файла выводились в StringGrid и можно было эти данные изменять. не подскажете как это можно сделать?
TIF (2006-10-28 16:13:00) [1]Procedure
SaveGrid;
var f:textfile;
x,y:integer;
begin
assignfile (f,'Filename');
rewrite (f);
writeln (f,stringgrid.colcount);
writeln (f,stringgrid.rowcount);
For X:=0 to stringgrid.colcount-1 do
For y:=0 to stringgrid.rowcount-1 do
writeln (F, stringgrid.cells[x,y]);
closefile (f);
end;
Procedure LoadGrid;
var f:textfile;
temp,x,y:integer;
tempstr:string;
begin
assignfile (f,'Filename');
reset (f);
readln (f,temp);
stringgrid.colcount:=temp;
readln (f,temp);
stringgrid.rowcount:=temp;
For X:=0 to stringgrid.colcount-1 do
For y:=0 to stringgrid.rowcount-1 do begin
readln (F, tempstr);
stringgrid.cells[x,y]:=tempstr;
end;
closefile (f);
end;
TIF (2006-10-28 16:08:00) [2]сказать, как сохранять данные из стринг-грида в файл, а потом их загружать из этого ФАЙЛА?
TIF (2006-10-28 16:06:00) [3]можно перезаписать полностью.
Star Dust (2006-10-28 16:04:00) [4]а как можно изменять ini файл из программы?
MsGuns (2006-10-28 15:59:00) [5]У стрингрида нет метода LoadFromFile, поэтому если Вы хотите работть непременно с ним, то потрудитесь "ручками" загружать ваши файлы ("Языковые" они или "горловые" - сути дела не меняет) в грид и сохранять их "взад".
Если данные в "файлах" не обязательно должы быть в ткстовом формате (часто это даже вредно) советую посмотреть в сторону TClientDataSet
MsGuns (2006-10-28 15:55:00) [6]Что такое "языковые" файлы ?