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

Вниз

Как узнать тип переменной?   Найти похожие ветки 

 
abstek ©   (2002-03-30 10:42) [0]

В процедуру MyProc передаётся одна из переменных: myStr10, myStr11, myStr12, myStr20, myStr21, myStr22.
Требуется в процедуре MyProc узнать тип переменной MyVar - это TMyStr1 или TMyStr2? Как это сделать по уму?


...
Type
TMyStr1 := type string;
TMyStr2 := tupe string;
...
var
myStr10, myStr11, myStr12 : TMyStr1;
myStr20, myStr21, myStr22 : TMyStr2;

...

procedure MyProc(var MyVar: variant);
begin
...

...

end;


 
Gurban ©   (2002-03-30 11:13) [1]

Попробуй сделать так:

if MyVar is TMyStr1 then что-нибудь;
if MyVar is TMyStr2 then что-нибудь другое;


 
Anatoly Podgoretsky ©   (2002-03-30 11:43) [2]

Gurban © (30.03.02 11:13)
С каких пор is можно применять к обычным переменным


 
abstek ©   (2002-03-30 11:56) [3]

На строку


if MyVar is TMyStr1 then ...;

компилятор ругается, что оператор и операнд не совместимы. Т.е. "is" применяется только для классов.


 
abstek ©   (2002-04-01 11:48) [4]

Неужели задача неразрешимая?


 
Виктор Щербаков ©   (2002-04-01 11:51) [5]

Реализуй два варианта функции MyProc c разными типами параметра.


 
Alx2 ©   (2002-04-01 11:58) [6]

>abstek © (01.04.02 11:48)
посмотри директиву overload. Авось спасет :)



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

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

Наверх




Память: 0.48 MB
Время: 0.01 c
1-32738
P.
2002-03-29 18:15
2002.04.11
Form


3-32616
ФФ
2002-03-19 07:41
2002.04.11
как открыть таблицу foxpro?


1-32886
Толик
2002-03-27 16:11
2002.04.11
И снова про вызовы функций-членов


4-33016
Python
2002-02-12 07:40
2002.04.11
Надо получить результаты работы программы (ее вывод на консоль) запуская ее из собственной программы, наример, с помощью ShellExecuteEx


1-32759
lipskiy
2002-03-30 20:14
2002.04.11
Сложный вопрос-предложение. Помогите включить поддержку кириллицы