우여곡절 끝에 비트맵을 리소스에 포함시키고, 프로그램 실행시 이 비트맵을
버튼(speedbuttom)의 glyph로 이용하고자 합니다.
근데, 한 비트맵을 여러 버튼에서 사용하거든요.
그래서, 다음과 같은 코드을 실행시켰는데...
...
procedure Tfrm_cln.FormCreate(Sender: TObject);
BmpHandle := LoadBitmap( HInstance, 'PDEL' );
end;
procedure Tfrm_cln.btn100Click(Sender: TObject);
begin
if (BmpHandle <> 0) then begin
btn100.Glyph.Handle := BmpHandle;
end;
end;
procedure Tfrm_cln.btn101Click(Sender: TObject);
begin
if (BmpHandle <> 0) then begin
btn101.Glyph.Handle := BmpHandle;
end;
end;
...
btn100이든 btn101이든 먼저 누른버튼에만 비트맵이 나타나는 군요.
제가 멀 잘못한것 같은데, 비트맵 리소스의 공유에 대한 자료가 찾기 참 힘들어서요...
부디 고수님들.... 전 뇌가 너무 아파여...
Resource 를 "TResStream" 를 사용해서 아예 파일루 만들어 노으심 될것 같아염.
예)
ResStream := TResourceStream.CreateFromID(HInstance, 1, RT_RCDATA);
ResStream.SaveToFile('alram.wav');
ResStream.Free;
저도 예전에 검색해서 찾아해본거라 ^^;