Показать сообщение отдельно
  #2  
Старый 19.05.2013, 18:02
Ruz Ruz вне форума
Прохожий
 
Регистрация: 01.05.2013
Сообщения: 14
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Не особо понял вопрос, но если тебе нужно программно поменять данные, то нужно всем label дать одинаковый тэг(tag);
Код:
procedure TForm1.FormCreate(Sender: TObject);
var label:TLabel;
N:integer;
begin
N:=1 // номер тэга
if label.tag=N then
begin
label.caption:='Text'; // текст
label.font.color:=clred; // цвет
label.font.size:=14; // размер
label.font.name:=Comic Sans MS; // шрифт
end;
end;

Сам новичок, но должно сработать.

Насчет $, строка может принимать такое значение. Например
Код:
edit1.text:='Казна $';
Ответить с цитированием