Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.04;
Скачать: CL | DM;

Вниз

Как можно передать объект в процедуру...   Найти похожие ветки 

 
Dimases   (2004-06-22 01:54) [0]

...чтобы в ней определить потом свойства? Я пытаюсь так:
procedure center(O: TObject);
var center: integer;
   align:integer;
begin
 center:=round(Form1.Width/2);
 align:=round(O.Width/2);
 O.left:=center-align;
end;

Идея этой процедуры - отцентровать по форме любой объект, который дасться ей на съедение.

Естественно ругается =), все-таки Delphi я уже давно забыл, а сейчас задачу одну написать надо, вот по немногу и пытаюсь вспомнить. Поможите?


 
jack128 ©   (2004-06-22 02:08) [1]


> procedure center(O: TControl);


 
Dimases   (2004-06-22 02:44) [2]

Спасибо, ясно, а как объект правильно передать в процедуру?
readerlink.Caption:="Text";
center(readerlink);
что-то не работает =(


 
Dimases   (2004-06-22 02:46) [3]

Все, вопрос исчерпан, center оказывается зарезервированное слово =)


 
Anatoly Podgoretsky ©   (2004-06-22 09:23) [4]

ЧТО!


 
TUser ©   (2004-06-22 09:36) [5]

procedure Proc(NECHTO:TNECHTO);
begin
  NECHTO.left:=center-align;      
end;



Страницы: 1 вся ветка

Текущий архив: 2004.07.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.052 c
1-1087305487
Zemal
2004-06-15 17:18
2004.07.04
Как реализовать интерфейс как в Delphi?


1-1087162291
Ivanov
2004-06-14 01:31
2004.07.04
работа с DLL


3-1086670978
TATIANA
2004-06-08 09:02
2004.07.04
Файлы FoxPro и Delhpi


1-1087334670
Knapweed
2004-06-16 01:24
2004.07.04
Ошибка при модальном вызове формы из DLL. Я в отчаянии!


4-1083367298
Bonial
2004-05-01 03:21
2004.07.04
Как работают "часы" в трее?