Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[2741] [질문] [델파이] 컴포넌트에 속성을 만드는데 옵젝트익스팩터에
krdream [ ] 1311 읽음    1998-05-09 17:29
아래와같이 aaa라는 스트링속성이 나왔으면 하는데 object inspector에는
aaa가 나오지 않아요
알려주시면 고맙겠습니다.
컴포넌트를 처음 만들어 봐서요,,,,

-------아      래---------
unit TwMemo;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TTwMemo = class(TMemo)
  private
      faaa: TStrings;

    { Private declarations }
  protected
    { Protected declarations }
    procedure Click1(Sender : TObject);

  public
    { Public declarations }
    constructor Create(AOwner:TComponent);override;
    destructor Destroy;override;
  published
    property aaa: TStrings read Faaa write Faaa;

    { Published declarations }
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('P_NoTask', [TTwMemo]);
end;
constructor TTwMemo.Create( AOwner : TComponent );
begin
    inherited Create(AOwner);
    // 생성시에 할일...
    Font.Name := 'fixedsys';
    Font.Size := 9;
    OnClick := Click1;
end;

destructor TTwMemo.Destroy;
begin
    // 해제시에 할일...
    inherited Destroy;
end;

procedure TTwMemo.Click1(Sender : TObject);
var aaa:TMemo;
    aa,bb:string;
begin
aaa.Lines.LoadFromFile('c:\autoexec.bat'); {<= 여기에 aaa로부터 가져오라고 하려고 했음}
aa:=aaa.text;
aaa.Lines.LoadFromFile('c:\config.sys');
bb:=aa+aaa.text;
ShowMessage(bb);
end;

end.


두파일을 하나의 파일로 합치려는 의도인데..
두파일중 하나의 파일을 aaa라는 스트링 속성에서 받아오는 프로그램을 만들려고
하거든요. 이콤포넌트는 막 연습하는 거라서 일단 aaa가 오브젝트인스팩터에
표시만 된다면 좋겠어요...
또 이상한것이 실행을 시키면 현재 메모에 두개의 파일이 합쳐져서 보이거든요?
원래 메모내용에는 아무것도 안써지고 메시지다이얼로그에만 파일내용이 보여져야하는데 둘다 보여요....

컴포넌트에 속성을 집어넣는 방법이 뭐가 틀렸을까요?



+ -

관련 글 리스트
2741 [질문] [델파이] 컴포넌트에 속성을 만드는데 옵젝트익스팩터에 krdream 1311 1998/05/09
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.