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

payk

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

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

  • Посещение

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

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

    Хвастаюсь

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