代码搜索：TBitmap
找到约 563 项符合「TBitmap」的源代码
代码结果 563
www.eeworm.com/read/266280/11233697
pas echmpubfunc.pas
unit EchmPubfunc;
interface
uses
SysUtils, JPEG, Graphics, ComCtrls;
function ConvertBitmapToRTF(const Bitmap: TBitmap): string;
procedure InsertBitmap(const Bitmap: TBitmap; const Ri
www.eeworm.com/read/248500/12556300
pas imgbnt.pas
unit ImgBnt;
interface
uses
SysUtils, StdCtrls ,Classes, Controls, ExtCtrls,Graphics,Messages;
type
TImgButton = class(TImage)
private
GetLoadFilePlayPicNorman:Tbitmap;
Get
www.eeworm.com/read/248500/12556314
pas imgbutton.pas
unit ImgButton;
interface
uses
SysUtils, StdCtrls ,Classes, Controls, ExtCtrls,Graphics,Messages;
type
TImgButton = class(TImage)
private
GetLoadFilePicNorman:Tbitmap;
GetL
www.eeworm.com/read/247846/12616247
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, jpeg, ExtCtrls;
type
TForm1 = class(TForm)
Button1: TBut
www.eeworm.com/read/237993/13914092
txt 不用image.txt
procedure TForm1.Button1Click(Sender: TObject);
var
BitMap:TBitMap;
begin
BitMap:=TBitMap.Create;
BitMap.LoadFromFile('E:\BMP&ICO\自制\Flash.bmp');
Form1.Canvas.StretchDraw(rect(10,10,410,
www.eeworm.com/read/237899/13920515
pas skingraphic.pas
unit SkinGraphic;
interface
uses Windows,SysUtils,Classes,Graphics,Jpeg;
type
TSkinGraphic = Class (TJPEGImage)
private
protected
public
procedure LoadFromFile(const FileName:
www.eeworm.com/read/237899/13920668
pas skingraphic.pas
unit SkinGraphic;
interface
uses Windows,SysUtils,Classes,Graphics,Jpeg;
type
TSkinGraphic = Class (TJPEGImage)
private
protected
public
procedure LoadFromFile(const FileName:
www.eeworm.com/read/236337/14019872
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls, StdCtrls;
type
TForm1 = class(TForm)
OrigImg: TImage;
Button1
www.eeworm.com/read/236337/14019920
pas unitfrmmain.pas
unit unitFrmMain;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
www.eeworm.com/read/236337/14019967
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Unit2, ExtCtrls, StdCtrls;
type
TForm1 = class(TForm)
Button1: TBu