-
Постов
645 -
Зарегистрирован
-
Посещение
Тип контента
Профили
Форумы
Блоги
Галерея
События
Весь контент payk
-
оО неплохая статья, решил отказываться от всяких прививок и как можно реже прибегать к лекарствам )))
-
с косметикой переборС косметикой всё норм, тут черно-белый фон, из-за него всё ) НО такую красоту не скрыть бесцветными тонами
-
Красота ! ! ! Но на 2рой фотке не очень *16. Остальные, просто великолепны !
-
И тебе поздорву, Ци.ник. Славных и долгих дней, желаю всем ))
-
Hannibal конечно фотожаба. Столько людей на форуме нет ! ))
-
coder Учеба, ВСГТУ. создаю прогу с базой данных. type telefon=record fio:string[50]; tel,dy:string[12];
-
s.fio Фамилия Имя Отчество s.tel Телефон s.dy год установки нужно, что бы прога вывела в СтрингГрид Информацию об установивших телефоны с Вводимого года.
-
Вот такая pas(57): Incompatible types
-
coder не научились чему ? здесь точно не такая ошибка как в прошлом коде.
-
coder Всё, разобрался )) это лишняя часть программы ))) Спасибо. ) вот здесь еще begin assignfile(f,'H:\Телефоны.txt'); reset(f); j:=1; stringgrid1.rowcount:=2; stringgrid1.Rows[2].clear; for i:=1 to filesize(f) do begin read(f,s); if s.dy>strtoint(combobox1.text) then (вот тута ошибка) begin stringgrid1.cells[0,j]:=s.fio; stringgrid1.cells[1,j]:=s.tel; stringgrid1.cells[2,j]:=s.dy; stringgrid1.RowCount:=stringgrid1.RowCount+1; inc(j); end; end; closefile(f); end;
-
пишет undeclared identifier: 'StringGrid1'
-
begin StringGrid1.Cells[0,0]:='ФИО'; (вот в этой строке ошибка) StringGrid1.Cells[1,0]:='Телефон'; StringGrid1.Cells[2,0]:='Год установки'; assignfile(f,'h:/телефоны.txt'); reset(f); for i:=1 to filesize(f) do begin read(f,s); stringgrid1.cells[0,i]:=s.fio; stringgrid1.cells[1,i]:=s.tel; stringgrid1.cells[2,i]:=s.dy; StringGrid1.RowCount:=StringGrid1.RowCount+1; end; closefile(f); end;
-
конец света близок ! ! ! спасайте свои души ! ! !
-
О_О в 18 квартале реально туман сильный. со вспышкой
-
Роланд из Гилеада ага, ботинками обкидать кого-нибудь на сцене.
-
остановка трамваев на центральном рынке
-
Скачал, установил, такая же фигня. Шо можно ещё сделать ?
-
он вместе с раздачей шел ? в какой папке ? MirrorsEdge.exe его я заменил
-
Люди ! ! ! У мну глюки ! ! ! вроде всё норм было, а потом она пешком начала ходить.