Проверка наличия указателей в стеке TStack

[ImmortalAlexSan]

Как проверить стек на пустоту?

While stack <не пуст> do
begin
...
end;

Подскажите как это сделать, пожалуйста. Работу не могу продолжить...

[Utkin]

Stack.Count - число элементов в стеке.

While Stack.Count>0 do

[VintProg]

Stack - Сколько в него можно засунуть мб?

[Utkin]

Сообщение от VintProg

Stack - Сколько в него можно засунуть мб?

Нисколько. Это стек указателей. А уж на че у тебя будут указывать указатели это твое дело - хоть мегабайты, хоть гигабайты .

[mutabor]

Сообщение от VintProg

Stack - Сколько в него можно засунуть мб?

Этот стек это не тот стек, к-рый в стеке, это тот стек, к-рый в динамической памяти

[Utkin]

Сообщение от mutabor

Этот стек это не тот стек, к-рый в стеке, это тот стек, к-рый в динамической памяти

Помедленей, а то у меня чуть переполнение стека не случилось.

[ImmortalAlexSan]

Ребят, а вот ещё вопрос: как мне сохранить указатель на координаты пикселя в этом стеке? Делаю вот так, но ничего не сохраняется.

Stack.push(pointer(Form1.Image2.Canvas.Pixels[i,j])); //где i,j - числа.

Или, если я правильно пишу в стек, то может неправильно извлекаю?

stack.pop; //вот так извлекаю, а мне надо извлечь i и j сами в себя.

Сообщение от Utkin

Stack.Count - число элементов в стеке.

Спасибо, как всегда выручаете!

[Stilet]

то может неправильно извлекаю?

Куда извлекаешь то?

извлечь i и j сами в себя

т.е. ты хочешь записать в стек координаты?

(Form1.Image2.Canvas.Pixels[i,j]))

Это ты пишешь цвет пикселя в стек. что тебе нужно туда писать?

[mutabor]

Что-то ты напутал, я так и не понял, что тебе нужно сохранить в стеке, цвет или координаты? Если цвет, то можно через Pointer. А если координаты, то напиши класс с координатами, и в стек пихай объекты этого класса. Вот так это примерно выглядеть должно:

stack:=TObjectStack.Create;
stack.Push(TPos.Create(p.X, p.Y)); //занести координаты затравочного пиксела в стек
...
ps:=stack.Pop as TPos; //Взять координаты затравки из стека

[Баламут]

TStack стандартный класс. Какие могут быть сложности с ним? В хэлпе же все расписано от и до. Не понимаю...