Вроде врубился

If isgump then GetGumpInfo(0,gi);
for i := 0 to GetArrayLength(gi.ResizePics)-1 do

if gi.ResizePics.x = 100 then
begin
waitgump('2');
break;
end;

GetGumpButtonsDescription выдает просто кнопки, а мне нужно выдергивать из ResizePic X и Y и исходя из этого нажимать ту или иную кнопку...С Getgumpinfo не знаком, тяжеловата для меня эта штука...как ни вчитывался, не понимаю:( Вот можно было бы переделать чуток ту програмку мою выше, то я был бы ра...

Вот смотрите что получилось...Правда выдает ошибку - Not in a loop в 30 строке, это Break, который после waitgump... procedure GetB; var GumpLines : TStringList; a : String; ButtonStringStart,i,Butt_Num: Word; BEGIN GumpLines := TStringList.Create; GetGumpfullLines(GetGumpsCount-1,GumpLines); for i ...

Поясни пожалуйста это - Pos(' 1 0 ',GumpLines.Strings)+8...
Интересует что это за 1 0 и в какой это строке и про +8 тоже интересно...

Нашел обозначение, но вставить свои исходные данные не могу (( Функция Copy(s,p,k) возвращает фрагмент строки s, который начинается в позиции p и имеет длину k. Функция Pos(s1,s) ищет первое вхождение подстроки s1 в строку s и возвращает номер первого символа s1 в строке s или 0 если не нашли. Проце...

А сможешь подсказать что это все обозначает?
a := Copy(GumpLines.Strings,Pos(' 1 0 ',GumpLines.Strings)+8,Length(GumpLines.Strings)-1);
Delete(a,Pos(' ',a),Length(a));

Вот с этой Pos не понятно...

Ребят Привет! Помогите с таким вопросом... Заношу в текстовый список TL ВСЁ содержимое гампа, в появившемся окне интересуют координаты X и Y ResizePics: X Y ID Width Height Page ElemNum 0 ResizePic: 180 140 5170 240 240 0 7 Как их вытащить в свою программу?? Просто в зависимости от них у меня будет ...