Работа с клилоками гампа

[Stels]

Небольшой пример кода, но почему-то система ничего не находит, выдает 0, что здесь может быть не так?

Code: Select all

text:='verite';
for i:=0 to length(gumpInfo.XmfHTMLGumpColor) do
a:=pos(text,GetCliloc(gumpInfo.XmfHTMLGumpColor[i].Cliloc_id));

вот клилок из гампа

Code: Select all

 All items must be made with verite ingots.

но в переменной "a" всегда остается 0

Помогите разобраться

[Vizit0r]

gump full lines в студию.

[Stels]

gump full lines в студию.

Code: Select all

XmfHTMLGumpColor: X   Y   Width   Height   ClilocID   Background   scrollbar   Hue   Page   ElemNum   ClilocText
0:        75  48  250  20  1045138  0  0  32767  0  0  Amount to make:
1:        275  76  200  20  1045153  0  0  32767  0  0  Amount finished:
2:        160  216  120  20  1011441  0  0  32767  0  0  EXIT
3:        225  25  120  20  1045133  0  0  32767  0  0  A bulk order
4:        75  72  120  20  1045136  0  0  32767  0  0  Item requested:
5:        75  96  210  20  1027028  0  0  32767  0  0  metal kite shield
6:        75  120  200  20  1045140  0  0  32767  0  0  Special requirements to meet:
7:        75  144  300  20  1045141  0  0  32767  0  0  All items must be exceptional.
8:        75  168  300  20  1045148  0  0  32767  0  0  All items must be made with verite ingots.
9:        160  192  300  20  1045154  0  0  32767  0  0  Combine this deed with the item requested.

[Gauhar]

В данном случае вместо GetCliloc нужно использовать GetClilocByID.