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

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

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

Директивы или что? [D6, Win95/98, WinME]

mike.dld © (2002-03-31 12:45:00)
У меня есть 3 модуля, в 1-ом - процедура, а из двух остальных я её вызываю, с разными параметрами. Как сделать так, чтобы в зависимости от значения параметра было написано или "with A do", или "with B do"?

Anatoly Podgoretsky (2002-03-31 13:29:00) [1]
if param=условие
then with A do
else with B do

Пиноккио (2002-03-31 13:11:00) [2]
Передавай StringGrid, как парамeтр Sender : TStringGrid
В процедуре пишешь
with Sender do begin

Rooman (2002-03-31 13:09:00) [3]
в процедуре делаешь так

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

with obj do
...

mike.dld (2002-03-31 12:59:00) [4]
A и B - StringGrid

Rooman (2002-03-31 12:56:00) [5]
в процедуре делаешь так

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

with obj do
...

Rooman (2002-03-31 12:56:00) [6]
A и B - объекты?

Наверх

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