ComboBox+Runtime Error

← →
CrazyAngel © (2002-08-16 20:27) [0]

Подскажите pls, что подставлять в качестве PControl в NewComboBox
чтобы при вызове add в Runtime не вываливался ComboBox ?
program l1;

uses
Windows,
messages,
KOL;

{$R *.RES}

var
form:PControl;
combobox:PControl;
begin
form:=NewForm(Applet,"Crazy Angel`s Nuker");
form.Width:=335;
form.Height:=190;
Form.Style := WS_BORDER or WS_SYSMENU or WS_MAXIMIZEBOX or WS_MINIMIZEBOX or WS_VISIBLE;

combobox := NewCombobox( form, [ {coReadOnly} ] ).PlaceDown;
with combobox^ do
begin
Add( "aaa" ); <- валится тут ;(
Add( "bbb" );
Add( "ccc" );
Add( "ddd" );
end;

run(form);
end.

← →
Vladimir Kladov (2002-08-17 14:54) [1]

Это баг асм-версии. Пока используйте PAS_VERSION, в следующем
обновлении будет исправлено.

ComboBox+Runtime Error Найти похожие ветки