Автор: S_lip 4.05.2006 3:32
При компиляции Делфи выдаёт ошибку: Undeclared identifier: 'ComboBox1'.
Код
unit sttuner;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;
type
TForm1 = class(TForm)
ComboBox1: TComboBox;
private]
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
begin
Form1.GroupBox1.ComboBox1.Text:=chr(random(256);
end.
Скажите пожалуйста, как это исправить?
Нужно, чтобы при старте программы каждый раз ComboBox1.Text'у присваивался какой-то символ.
Автор: xds 4.05.2006 3:47
Цитата
При компиляции Делфи выдаёт ошибку: Undeclared identifier: 'ComboBox1'.
Это происходит потому, что
ComboBox1 является полем объекта
Form1, а не
GroupBox1.
Цитата
Нужно, чтобы при старте программы каждый раз ComboBox1.Text'у присваивался какой-то символ
Добавь обработчик события формы
OnCreate:
procedure TForm1.FormCreate(Sender: TObject);
begin
Randomize;
ComboBox1.Text := Chr(32 + Random(256 - 32)); // исключаем управляющие символы
end;
Автор: S_lip 4.05.2006 3:56
Большое Спасибо! Всё работает!