Оригинальный DVD-ROM: eXeL@B DVD !
eXeL@B ВИДЕОКУРС !

ВИДЕОКУРС
выпущен 4 ноября!


УЗНАТЬ БОЛЬШЕ >>
Домой | Статьи | RAR-cтатьи | FAQ | Форум | Скачать | Видеокурс
Новичку | Ссылки | Программирование | Интервью | Архив | Связь

БОЛЬШОЙ FAQ ПО DELPHI



Вызов процедуры, имя которой содержится в переменной 2

Как мне использовать переменную типа string в качестве имени процедуры?

Никак. Тем не менее, вы могли бы создать StringList как показано ниже:


 StringList.Create; StringList.AddObject('Proc1',@Proc1);
 StringList.AddObject('Proc2',@Proc2);
 

и затем реализовать это в вашей программе:


 var
   myFunc : procedure;
 begin
   if Stringlist.indexof(S) = -1 then
     MessageDlg('Не понял процедуру '+S,mtError,[mbOk],0)
   else
   begin
     @myFunc := Stringlist.Objects[Stringlist.indexof(S)];
     myFunc;
   end;
 end;
 




<< ВЕРНУТЬСЯ В ОГЛАВЛЕНИЕ



Материалы находятся на сайте https://exelab.ru/pro/



Оригинальный DVD-ROM: eXeL@B DVD !


Вы находитесь на EXELAB.rU
Проект ReactOS