|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
16.05.2010, 22:00 | #1 |
Новичок
Джуниор
Регистрация: 16.05.2010
Сообщений: 1
|
Создание Labela
В общем нужно создать лабел по кнопке, но при компиляции вот этого кода, компилятор меня яростно материт =((
var TextLab : TLabel; begin with TextLab.Create(Self) do begin Name := 'l' + IntToStr(k); Left := 500; Top := 500; Caption := 'My Text'; BringToFront; Show; k := k + 1; end; end; Последний раз редактировалось polosataja; 16.05.2010 в 22:09. |
17.05.2010, 04:06 | #2 |
Регистрация: 16.05.2010
Сообщений: 6
|
у меня всё работает нормально...
Попробуй разве что сделать так: TextLab:=TLabel.Create(self); with TextLab do |
17.05.2010, 19:01 | #3 |
Пользователь
Регистрация: 22.01.2010
Сообщений: 37
|
Label
Вы забыли указать свойство Parent (например Parent:=Form1)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создание 3d игры на C++ | Wakatsusiro | Gamedev - cоздание игр: Unity, OpenGL, DirectX | 6 | 26.11.2011 01:45 |
Создание БД в Access | Маришка85 | SQL, базы данных | 0 | 12.11.2009 20:02 |
создание компонента | Bayazet | Общие вопросы Delphi | 4 | 17.12.2008 16:48 |
Создание файла | Nowise | Паскаль, Turbo Pascal, PascalABC.NET | 7 | 04.04.2008 19:55 |