Перейти к содержанию

payk

Пользователи
  • Постов

    645
  • Зарегистрирован

  • Посещение

Весь контент payk

  1. мну пох ! )) пусть гробят своё здоровье ! Digma +100500 иногда очень глупо смотрятся ))
  2. ~narutorengan~ +1 тоже черный экран не появляется
  3. в 18 квартале есть Нефритовые массажные кровати. Не помню сколько стоят, давно там не был.
  4. оО неплохая статья, решил отказываться от всяких прививок и как можно реже прибегать к лекарствам )))
  5. с косметикой переборС косметикой всё норм, тут черно-белый фон, из-за него всё ) НО такую красоту не скрыть бесцветными тонами
  6. не курю ))
  7. Красота ! ! ! Но на 2рой фотке не очень *16. Остальные, просто великолепны !
  8. И тебе поздорву, Ци.ник. Славных и долгих дней, желаю всем ))
  9. payk

    Хвастаюсь

    Купил флейту, уже выучил все ноты ))
  10. Hannibal конечно фотожаба. Столько людей на форуме нет ! ))
  11. О_О точно. 2 курс
  12. coder Учеба, ВСГТУ. создаю прогу с базой данных. type telefon=record fio:string[50]; tel,dy:string[12];
  13. s.fio Фамилия Имя Отчество s.tel Телефон s.dy год установки нужно, что бы прога вывела в СтрингГрид Информацию об установивших телефоны с Вводимого года.
  14. Вот такая pas(57): Incompatible types
  15. coder не научились чему ? здесь точно не такая ошибка как в прошлом коде.
  16. 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;
  17. пишет undeclared identifier: 'StringGrid1'
  18. 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;
  19. конец света близок ! ! ! спасайте свои души ! ! !
  20. О_О в 18 квартале реально туман сильный. со вспышкой
  21. Роланд из Гилеада ага, ботинками обкидать кого-нибудь на сцене.
  22. остановка трамваев на центральном рынке
  23. Скачал, установил, такая же фигня. Шо можно ещё сделать ?
  24. он вместе с раздачей шел ? в какой папке ? MirrorsEdge.exe его я заменил
  25. Люди ! ! ! У мну глюки ! ! ! вроде всё норм было, а потом она пешком начала ходить.
×
×
  • Создать...