Q&A

  • Component error 꼭좀 알려주십시요.
안녕하세요.
우측정렬에, 세자리수마다 콤마가 들어가는 숫자전용 edit component를 만들려고
하는데, palette에 등록을 하지않고  동적으로 생성하여 데스트를 하면 잘 되는데 이놈을 등록만하여 폼에 떨구면
control 'NumberEdit1' has no parent window 라는 error만 나옵니다.
..........................
constructor TNumberEdit.Create(AOwner : TComponent);
begin
  inherited Create(AOwner);
  ...
  ...
  Parent := Self 도 삽입해보고 Parent := AOwner도 삽입해보았어나 안됩니다.

palette에 등록하지않고 코드로 동적으로 생성하면 작동이 잘됩니다.

unit Unit1
interface
uses
  windows, messgaes,...., NumberEdit;

type
  TForm1 = class(TForm)
  procedure FormCreate(Sender : TObject);
....
....
public
  numberEdit1 : TNumberEdit;
end;

....
....

procedure TForm1.FormCreate(Sender : TObject);
begin
  numberEdit1 := TNumberEdit.Create(self);
  with numberEdit1 do
  begin
     parent := self;
     show;
  end;
end;

......
이런식으로 하면 작동이 잘됩니다.
어디서 잘못이 있는건지요.
제가 아직 델파이 초보라 Component를 직접만들수있는 능력은 없고
여기서 구한 숫자전용edit component의  소수code를 수정하여 제에게 필요한 edit를 만들고 있는데 여기서 막히고 말았습니다.
A4용지 백여장을 프린트한 정보와 몇권의 책을 참조하여 일주일 이상걸려 만든건데 아직 능력이 안되는 모양입니다.
부디 해결책을 알려주십시요.
아님 delphi7 에서 무리없이 돌아가는 실시간 우측정렬에 세자리마다 콤마가 들어가는 숫자전용 edit component를 부디 자료실에 올려주십시요.
고수님들께 고개숙여 부탁드립니다.
좋은 하루 되십시요.
0  COMMENTS