Q&A

  • 동적으로 생성된 이미지 안보이게 하기...
델파이5/Win98 Se 입니다.

이미지를 동적으로 생성했는데...

버튼(Button1)이 클릭되면

그렇게 생성된 이미지가 안보이게(Image1.visible:=false;)

하려는데.. 잘 안되구.. 에러만 뜨네요..

쉬울줄 알았는데... 잘 안되고.. 질답을 검색해도 답을 찾기가 힘들더군요...

아래는 소스입니다.

===============================================================

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    ScrollBox1: TScrollBox;
    Button1: TButton;
    Button2: TButton;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
var
    Image1:TImage;
begin
    Image1 := TImage.Create(Self);
    Image1.Parent := ScrollBox1;
    Image1.Picture.LoadFromFile ('c:imsis01.bmp');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
   Image1.Visible := false; -> 이부분 에러
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
   Image1.free; ->해제도 안되요..
end;

end.


===============================================================






1  COMMENTS
  • Profile
    하얀까마귀 2002.01.25 21:31
    안녕하세요 하얀까마귀 입니다.

    이거 컴파일 에러 나는거 아니에요??

    버튼을 눌렀을때가 아니라.. 컴파일도 안될것 같은데..



    여기에서 var Image2 : Timage를
    위쪽에 보면
           Image1 : TImage;    <--- 요렇게 하세요..

    그럼 즐거운시간 되세요..

    - 하얀까마귀 -