Главная BorlanD Russian Сommunity Регистрация

Вход

Приветствую Вас Гость | RSSПятница, 18.05.2012, 11:23
Меню сайта

CodeGear

Borland

Категории каталога
Delphi 7 [49]
Delphi 7
C++Builder 6 [7]
C++Builder 6
JBuilder [0]
JBuilder
Turbo Pascal [0]
Turbo Pascal
Turbo C++ [0]
Turbo C++
Kylix [0]
Kylix
InterBase [0]
InterBase
CodeGear RAD Studio [0]
CodeGear RAD Studio
ER / Studio [1]

Официальные сайты

Наш опрос
Вернетесь ли вы на сайт?
Всего ответов: 1638

Каталог статей
Главная » Статьи » Продукты CodeGear » Delphi 7

Урок 1. Первая программа на Delphi

Начнем изучение Delphi с самого простого. Для начала запустите Delphi. После запуска, перед вами появиться окно вашего будущего приложения. Код, который уже сгенерирован, можно просмотреть в окне кода, для перехода к нему нажмите F12. Пока не чего не изменяйте, подробнее его мы рассмотрим в следующих главах. Теперь преступил к созданию первой программы. Первым делом поменяем размер формы, для этого кликнете в любое место формы. Потом отредактируйте свойства ClientHeight и ClientWidth, поставьте значения 150 и 180 соответственно, первое свойство изменяет высоту окна, а второе его ширину. Также можно подписать окно, для этого отредактируем свойство Caption, поставив значение «Программа». Пример получившегося окна приведен на рисунке 1, пример настроек приведен на рисунке 2.  



Рис 1 – Пример окна
  


Рис 2 – Пример настроек
 
Далее выберите на палитре Standard элемент Button. И поместите его на форме, после этого отредактируйте свойство Caption, поставив значение «ОК», это свойство определяет надпись кнопки. Пример приведен на рисунке 3. Далее выберите на палитре Standard элемент Label. И поместите его на форме, после этого отредактируйте свойство Caption, поставив значение «Здесь будет надпись», это свойство определяет надпись объекта. Пример приведен на рисунке 4.


Рис 3 – Пример окна с размещенной кнопкой
 


Рис 4 – Пример окна с надписью 

После этого выделите кнопку, и перейдите на вкладку Events окна Object Inspector, двойным щелчком левой кнопки мыши, зайдите в событие OnClick, данное событие происходит, когда кто-то нажмет кнопку. После этого произойдет автоматический переход к окну кода и сгенерируется код события приведенный ниже (// авторские комментарии не генерируемые Delphi). 


procedure TForm1.Button1Click(Sender: TObject); //Название процедуры

begin //начало

 //место для кода

end; //конец 


Теперь допишем нужный код для работы нашей программы.

А именно код label1.Caption:='Моя первая программа';

Где:

Label1 – Название объекта, в нашем случае это надпись.

CaptionСвойство объекта.

:= - оператор присваивания, то есть с помощью этого оператора мы присваиваем новое значение свойству объекта.

– кавычки обозначают, начало и конец строкового значения.

; - оператор закрытия, служит для закрытия операций.
 
После внесения данного строки код должен выглядеть так: 

procedure TForm1.Button1Click(Sender: TObject);

begin

label1.Caption:='Моя первая программа';

end; 


Теперь запустите программу и проверьте её работу путем нажатия кнопки «ОК».
Все на это первый урок закончен.
Категория: Delphi 7 | Добавил: Дубин (11.05.2008) | Автор: Дубин Михаил Олегович
Просмотров: 5824 | Рейтинг: 4.5/12 |
Всего комментариев: 4
13.08.2010
3. Магомедов Али (SpellerM)
Нужно запустить программу нажав F9

05.08.2009
2. Brett brett (brett)
у меня все хорошо сработало...) вот как у меня выглядит:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Label1: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
label1.caption:='privet';
end;

end.


14.11.2008
1. Shasta (Shasta)
Урок ясный и понятный. Для тех, кто "в танке". Но у меня, лично, после нажатия "ок" ничего не сработало. Что я могу делать не так? Направьте, пожалуйста.

P.S. Идентичный вопрос оставила на форуме, но никто не откликнулся. Оперативность отсутствует. sad


Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]

Важно

Форма входа
Логин:
Пароль:

Поиск

Статистика


Рейтинг@Mail.ru


Реклама
мультик монстры против пришельцев. Кредит портал кредит для ип без поручителей

Copyright MyCorp © 2012Хостинг от uCoz