Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

2 komandi posle THEN-a

timona © (2005-08-17 12:57:00)
kak mojno napisat 2 comandi posle then? naprimer

if image1.Top<0 then image1.Top:=bitbtn1.Top-20

vot xochu uznat,sushetvuyetli kakayata komanda pozvolyayusheye,naprimer posle then peremestit image naverxu bitbtn-a i odnovremenno zavershit zadachu timera

kak bit AND

George (2005-08-17 23:07:00) [1]
Вопщим ликбез:

If dosmth='YES!!!' then begin
do1:=1;
do2:=2;
do(скока_хош):=mnogo;
end else begin
nedo1:=1;
nedo2:=2;
.........
end;

Кстати если dosmth='YES!!!' вставить в скобки, то можно еще и or присобачить... Или and например... If (издеваются, гады) and (хочется дать по шапке) then .....

Вроде все так...

Tonich (2005-08-17 14:14:00) [2]

> злобная танька (17.08.05 13:47) [6]
я так и понял

злобная танька (2005-08-17 13:47:00) [3]
> Tonich © (17.08.05 13:13) [3]
не скажу

Александр Иванов (2005-08-17 13:35:00) [4]
begin ... end и все находящееся между ними называют составным оператором, так что два не получится :)

Плохиш (2005-08-17 13:34:00) [5]

> timona (17.08.05 12:57)

Это уже даже не детский сад. Тошно :-((

Tonich (2005-08-17 13:13:00) [6]

> злобная танька (17.08.05 13:09) [2]
> можно процедуру вызвать! :)
а какую надо вызывать процедуру, чтобы

> napisat 2 comandi posle then?
?????

злобная танька (2005-08-17 13:09:00) [7]
можно процедуру вызвать! :)
но лучше конечно F1 нажать.. помогает!

Tonich (2005-08-17 13:07:00) [8]
хм одновременно))))))

можно так

if image1.Top<0 then begin image1.Top:=bitbtn1.Top-20 Timer1.Enable := False; end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »