Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Controls

Sabor © (2002-09-23 21:15:00)
У меня такой вопрос. В GroupBox-е есть Edit и ComboBox которые по нажатию button должны получать текст в окне. Пробовал через свойство Control GridBox-a - идет сообщение о несовместимости типов классов TControl и TEdit. Как нужно действовать?

Кадастр и ты (2002-09-23 23:24:00) [1]
if ch is TEdit then
ch4 := TEdit(ch) else
if ch is TBlaBlaBla then
Ch... := TBlaBlaBla(Ch)
etc

В таком духе

AL2002 (2002-09-23 22:13:00) [2]
В лейблаз не текст, а кепшн.

Sabor (2002-09-23 21:52:00) [3]
procedure TForm2.Button1Click(Sender: TObject);

var i,j:integer;s:string;
ch:TControl;
ch3:Tcustomedit;
ch4:Tedit;

begin
for i:=0 to groupbox1.ControlCount-1 do
begin
ch:=groupbox1.Controls[i];
(ch as Tedit).text:="Delphi";

end;

Кадастр и ты (2002-09-23 21:42:00) [4]
> Пытался

Так покажи, как пытался.

Кадастр и ты (2002-09-23 21:40:00) [5]
Да, тут можно только гадать. Погадаем.

Sabor (2002-09-23 21:31:00) [6]
Хочу сделать так, чтобы компоненты GroupBox (2 Edit-a и 2 Combobox-a при обработке сообщения ButtonClick в своих полях писали тексть "Delphi". Пытался произвести перебор элементов управления GroupBox-a и присвоить св-ву Text Edit-ов и СomboBox-ов значение "Delphi". Неполучилось?

AL2002 (2002-09-23 21:20:00) [7]
>Sabor (23.09.02 21:15)
Подробней, пожалуйста. Очень уж заковыристо.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »