Здравствуйте!!!
Мне необходимо прописать на кнопку Buttion код, при нажатии кнопки в объект StringGrid загружается файл формата txt.
Вот код который я прописала на кнопку:
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 | procedure TForm6 . Button1Click(Sender: TObject);
var i, N: Integer ;
begin
if OpenDialog1 . Execute then
with TStringList . Create do
try LoadFromFile(OpenDialog1 . FileName);
stringgrid1 . RowCount:=Count;
for i:= 0 to Count- 1 do begin
stringgrid1 . Rows[i].CommaText:=Strings[i];
end
finally
end ;
end ;
|
Админ: Пользуемся тегами!
Он работает, данные из файла загружаются, но проблема в том, что я мне нужно чтобы данные загружались с пятой строки, а не с начала документа. А вот как это указать я не могу сообразить.