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

Вниз

Директивы или что?   Найти похожие ветки 

 
mike.dld   (2002-03-31 12:45) [0]

У меня есть 3 модуля, в 1-ом - процедура, а из двух остальных я её вызываю, с разными параметрами. Как сделать так, чтобы в зависимости от значения параметра было написано или "with A do", или "with B do"?


 
Rooman ©   (2002-03-31 12:56) [1]

в процедуре делаешь так

var obj:TObject;
...
if param=value1 then obj:=A;
if param=value2 then obj:=B;

with obj do
...



 
Rooman ©   (2002-03-31 12:56) [2]

A и B - объекты?


 
mike.dld   (2002-03-31 12:59) [3]

A и B - StringGrid


 
Rooman ©   (2002-03-31 13:09) [4]

в процедуре делаешь так

var obj:TStringGrid;
...
if param=value1 then obj:=A;
if param=value2 then obj:=B;

with obj do
...


 
Пиноккио   (2002-03-31 13:11) [5]

Передавай StringGrid, как парамeтр Sender : TStringGrid
В процедуре пишешь
with Sender do begin


 
Anatoly Podgoretsky ©   (2002-03-31 13:29) [6]

if param=условие
then with A do
else with B do



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

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

Наверх




Память: 0.47 MB
Время: 0.019 c
1-32767
KvORubin
2002-03-31 06:27
2002.04.11
Как корректно воспроизвести WAV файл (Без TMediaPlayer) ???


6-32933
Ivanov Vova
2002-01-22 15:41
2002.04.11
Мастера, помогите ламеру, плз.


1-32870
QWest
2002-03-29 09:45
2002.04.11
Помогите други!!!!!!!!!1


1-32896
BlackJack
2002-03-22 19:44
2002.04.11
Есть ли прога типа sourse sav-а только для delphi ?


14-32958
IronHawk
2002-02-28 18:32
2002.04.11
Как с помощью одного QuickRep-a сделать 2,3,4 страницы разные ?