Значение в Label

[coolle]

Здраствуйте!
Как передать значение в Label с помощью GetWindowText?

[Stilet]

Если не ошибаюсь никак. Label не имеет Handle.

[coolle]

А альтернатива какая нибудь существует?

[Sibedir]

Опишите задачу впринципе. Напишите что вы делаете, а не как вы это делаете.

[yasic]

Попробуйте не в LAbel, а в StaticText1(вкладка Additional). StaticText1 имеет Handle

[coolle]

Мне необходимо сделать счетчик который бы работал в потоке к примеру вот так

var
i:integer;
begin
repeat 
i:=i+1;
label1.caption:=floattostr(i);
until false;
end;

Но как только помещаю ее в поток программа вылетает,опытным путем удалось выяснить что дело в label,как оказалось он не потоко безопасен!

[yasic]

Можно полный текст программы... вместе с потоком

[coolle]

зачем?суть вопроса в выше указанном коде,можешь его и считать всем кодом!Он так же вылетит если его поставить на поток

[yasic]

А какой смысл засовывать этот кусок кода в поток, если конструкция repeat..until false монопольно захватит весь ресурс проца?

[Sibedir]

А StaticText не подходит?

var
  p: PAnsiChar;
begin
  GetMem (p, 255);
  GetWindowText (StaticText1.Handle, p, 255);
  ShowMessage (p);
end;