|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
работа с элементом из переменой
Как с элементом из переменой (string) работать. В Microsoft Visual FoxPro 9.0
просто перед переменой ставиш &. А как это сделать в Delphi? Последний раз редактировалось mbv, 14.08.2010 в 22:48. |
#2
|
|||
|
|||
Вероятно, имеется в виду с отдельными символами, из которых состоит строка (значение переменной типа String).
Примерно так : Код:
Var Sx : string; i : integer; Ch : char; ... Sx:='abcdefgh'; for i:=1 to length(Sx) do begin Ch:=Sx[i]; //это и есть "очередной" символ end; ... |
#3
|
|||
|
|||
Цитата:
например у меня есть элемент button1 а переменая а равняется 'button1' (a:='button1') мне надо типо a.Capiton:='1'; В Microsoft Visual FoxPro 9.0 это будет так &a.Capiton:='1' |
#4
|
||||
|
||||
Код:
if FindComponent(a) <> nil then (FindComponent(a) as TButton).Caption := '1'; Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#5
|
||||
|
||||
Цитата:
Код:
var x: TButton; ... begin x := FindComponent(a); if x <> nil then (x as TButton).Caption := '1'; ..... Вобщем это в сторону оптимизации. |
#6
|
|||
|
|||
на
Код:
x := FindComponent(a); Код:
[Error] Unit3.pas(224): Incompatible types: 'TButton' and 'TComponent' Последний раз редактировалось mbv, 15.08.2010 в 12:25. |
#7
|
||||
|
||||
а чем обычный вариант не подходит:
aButton: TButton; aButton.Caption:='aButton'; |
#8
|
||||
|
||||
В общем верно. Искать вы можете с помощью этой функции абстрактный компонент TComponent. А вот когда вы его нашли и убедились, что этот компонент нужного вам класса (свойства .ClassType или .ClassName), вот тогда вы уже имеете право привести явно к нужному вам типу и работать со свойствами уже не абстрактного класса TComponent, а нужного вам конкретного типа.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |