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

6-6-6

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

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

  • Посещение

Весь контент 6-6-6

  1. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, jpeg, ExtCtrls, StdCtrls; type TForm1 = class(TForm) Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Button1: TButton; Button2: TButton; Image1: TImage; Image2: TImage; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin {Портретная фотография становится видимой} Image1.Visible:=True; {Художественная фотография становится невидимой} Image2.Visible:=False; end; procedure TForm1.Button2Click(Sender: TObject); begin {Портретная фотография становится невидимой} Image1.Visible:=False; {Художественная фотография становится видимой} Image2.Visible:=True; end; end. - это и есть код программы его надо в WOrd вставлять?
  2. Вот собственно создал программу, сохранил ее в exe файл. Вопрост в том как сделать вот это -(. Оформите отчет, скопировав текст модуля из окна кода программы в WORD и запустите программу на выполнение)Как сделать отчет с кодом программы?
  3. НА стбуре Продам перса 51 левела ХАНТ вкован *издато за дейлики на оло ник Avinjer ДЕНЕГ на счету 1600 голд репа прокачана с громовым утесом-до превознесения, 10 или 12 маунтов(в том числе и Меведь куплен за 650 голд) 27 питомцев(Первая помощь- 400, горное дело 300, рыбная ловля 214, кулинария 180, инжинерка 340-куплены все свитки даже редкие ) , так же на аке есть 80 -ка брата, продам их всего за 250 р желательно на мобилку ПИСАТЬ В личку
  4. ВСЕ "A"ВВОДИ бля читай хоть маленько
  5. НЕ НЕ НЕ" Путина и медведева отбросим, они пришлу уже на все готовое.Пойдем по понижащей, Сталину не повезло попал не туда, вот Ленин вот что при нем жилось лучше, хрен на эти революции они ваще по беспонту там проходили, Ленин реальный мужик обьядинил людей, люди поверили в него и добились чегото там хз чего. А вот Медведев - это говно унылое, чуть ли не спит говоря перед теликом, Путина и то больше видно
  6. Выйду на улицу, закурю сигарету и буду ждать конца света
  7. А ночью что получается 2,5 копейки за мегабайт, после 12?
  8. Све вывезет любого, если правильно раскачать,СВЕН РЕТРО vs ЛОВКОСТИ- это пипец ловкости
  9. давно бы сходили кто сбе хочет футболку и сами себе сделали
  10. а что надо патчить???или для СТ 3.0.9 прет?
  11. 6-6-6

    wow.burnet.ru

    БЕЙ БУРИК!!!!!!!
  12. 6-6-6

    wow.burnet.ru

    просто набежали Бурнетчики на стбур и онлайн поднялся
×
×
  • Создать...