Форум: "Начинающим";
Текущий архив: 2006.11.12;
Скачать: [xml.tar.bz2];
Внизini-файл Найти похожие ветки
← →
Star dust © (2006-10-28 15:42) [0]у меня в программе есть языковые ini-файлы. Нужно чтобы данные из языкового файла выводились в StringGrid и можно было эти данные изменять. не подскажете как это можно сделать?
← →
MsGuns © (2006-10-28 15:55) [1]Что такое "языковые" файлы ?
← →
MsGuns © (2006-10-28 15:59) [2]У стрингрида нет метода LoadFromFile, поэтому если Вы хотите работть непременно с ним, то потрудитесь "ручками" загружать ваши файлы ("Языковые" они или "горловые" - сути дела не меняет) в грид и сохранять их "взад".
Если данные в "файлах" не обязательно должы быть в ткстовом формате (часто это даже вредно) советую посмотреть в сторону TClientDataSet
← →
Star Dust © (2006-10-28 16:04) [3]а как можно изменять ini файл из программы?
← →
TIF © (2006-10-28 16:06) [4]можно перезаписать полностью.
← →
TIF © (2006-10-28 16:08) [5]сказать, как сохранять данные из стринг-грида в файл, а потом их загружать из этого ФАЙЛА?
← →
TIF © (2006-10-28 16:13) [6]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;
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.11.12;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.042 c