DelphiͼÏñ´¦Àí
±¾ÎÄÀ´×ÔCSDN²©¿Í£¬×ªÔØÇë±êÃ÷³ö´¦£ºhttp://blog.csdn.net/maozefa/archive/2009/10/28/4737584.aspx
ͼÏñËõ·ÅÊÇ×î³£ÓõÄͼÏñ´¦Àí£¬ÔÚͼÏñÀÉìºÍÈ¡µÃͼÏñÂÔͼÖж¼ÒªÓõ½¡£Í¼ÏñËõ·ÅÖÊÁ¿µÄºÃ»µÓëͼÏñÏñËØ²åÖµ·½Ê½Óйأ¬±¾Î͍ÒåÁ˳£ÓõÄ3ÖÖ²åÖµ·½Ê½£¬¼´ÁÙ½ü²åÖµ¡¢ÏßÐÔ²åÖµºÍË«Á¢·½²åÖµ·½Ê½£º
view plaincopy to clipboardprint?
type
// ²åÖµ·½Ê½: ȱʡ(ÏßÐÔ²åÖµ)£¬ÁÙ½ü£¬ÏßÐÔ£¬Ë«Á¢·½
TInterpolateMode = (imDefault, imNear, imBilinear, imBicubic);
type
// ²åÖµ·½Ê½: ȱʡ(ÏßÐÔ²åÖµ)£¬ÁÙ½ü£¬ÏßÐÔ£¬Ë«Á¢·½
TInterpolateMode = (imDefault, imNear, imBilinear, imBicubic);
¾ßÌåµÄËõ·Å¼°ÆäÓõ½µÄ²åÖµ¹ý³Ì´úÂëÈçÏ£º
view plaincopy to clipboardprint?
¹ý³Ì¶¨Ò壺
// ÉèÖÃË«Á¢·½²åÖµµÄбÂÊ¡£È±Ê¡ÖµÎª-0.75
procedure SetBicubicSlope(const Value: Single);
// Ëõ·ÅͼÏñ£¬IpMode²åÖµ·½Ê½
procedure ImageScale(Dest: TImageData; const Source: TImageData;
IpMode: TInterpolateMode = imDefault); overload;
// Source·Ö±ð°´±ÈÀýScaleXºÍScaleYËõ·Åµ½DestµÄ(x,y)×ø±ê£¬IpMode²åÖµ·½Ê½
procedure ImageScale(Dest: TImageData; x, y: Integer; const Source: TImageData;
ScaleX, ScaleY: Single; IpMode: TInterpolateMode = imDefault); overload;
// TGraphic¶ÔÏóËõ·Åµ½Dest
procedure ImageScale(Dest: TImageData; const Source: TGraphic;
IpMode: TInterpolateMode = imDefault); overload;
procedure ImageScale(Dest: TImageData; x, y: Integer; const Source: TGraphic;
ScaleX, ScaleY: Single; IpMode: TInterpolateMode = imDefault); overload;
// TGpBitmap¶ÔÏóËõ·Åµ½Dest
procedure ImageScale(Dest: TImageData;
const Source: TGpBitmap; IpMode: TInterpolateMode = imDefault); overload; &nb
Ïà¹ØÎĵµ£º
ÄÚÈݼò½é
dbExpressÊÇBorland¹«Ë¾ÏÂÒ»´úÊý¾Ý·ÃÎʼ¼Êõ¡£±¾Êé²»½öÏêϸ½éÉÜÁËdbExpressµÄ»ù±¾¹¦ÄÜ¡¢Ê¹Óü¼ÇÉÒÔ¼°Delphi/KylixµÄDataSnap¼¼Êõ£¬»¹ÏêϸÌÖÂÛÁËdbExpressµÄʵÏÖÔÀíÒÔ¼°dbExpressµÄδÀ´·¢Õ¹Ç÷ÊÆ¡£±¾Êé½á¹¹ÇåÎú£¬½²½â͸³¹£¬ÊµÀý·á¸»¡£×÷ÕßÀîάÊÇBorland¹«Ë¾ÖøÃû¼¼Êõר¼Ò£¬ÔøÖøÓжಿDelphiÃû ......
Delphi µÄ×Ö·û¼°×Ö·û´®[1] - string¡¢AnsiString¡¢WideString¡¢String[n]¡¢ShortString
2008-10-17 14:57:17
//×î³£ÓÃµÄ string
var
str: string; {¶¨Òå}
begin
str := 'ÍòÒ»'; {¸³Öµ}
ShowMessage(IntToStr(Length(str))); {³¤¶ÈÊÇ: 4}
end;
//³¤×Ö·û´® AnsiString; ÔÚµ±Ç°°æ± ......
{ º¯Êý : RESULTSTRING = HexToBin(HEXSTRING)
{ Ä¿µÄ : °ÑÊ®Áù½øÖÆ×Ö·û´®×ª»»Îª¶þ½øÖÆ×Ö·û´®
{
{===============================================================}
{ º¯Êý : RESULTINTEGER = HexCharToInt(HEXCHAR)
{ Ä¿µÄ : ת»»Ò»¸öÊ®Áù½øÖÆ×Ö·ûΪÕûÊý
{==================================================== ......
·þÎñ¶Ë£ºÌí¼ÓADOConnection£¬ADOQuery1£¬ADOQuery2¡£ÉèÖÃADOQuery1ΪÖ÷±í£¬ADOQuery2Ϊ´Ó±í¡£(ͨ¹ý ADOQuery2.SQL.Text:= 'select * from ´Ó±í where FKID=:Ö÷±íPKID'ÉèÖÃ)¡£Ìí¼ÓDataSetProvider1ºÍDataSetProvider2·Ö±ðÁ¬½Óµ½ADOQuery1ºÍADOQuery2¡£
¿Í»§¶Ë£ºÌí¼ÓClientDataSet1£¬ClientDataSet2¡£ClientDataS ......
ÔÚDELPHIΪ±à³ÌÕßÌṩÁËÒ»¸öÁé»îµÄ»æÍ¼³¡Ëù,¼´±¾ÎÄËùÊöµÄ
CANVASÀà,ÔÚDELPHIÖÐµÄºÜ¶à¿Ø¼þ¶¼¾ßÓдËÊôÐÔ,ʹ±à³ÌÕß¿ÉÒÔ
ÔÚÕâЩµÄ¿Ø¼þµÄ±íÃæËæÐÄËùÓûµÄ»æÍ¼,Õâ¶ÔÍêÉÆÓû§½çÃæ»òÕßÖÆ
×÷һЩÆÁÄ»ÌØ¼¼¶¼ÓÐ×Å·Ç·²µÄ×÷ÓÃ,ÏÂÃæ¾ÙÀý˵Ã÷¼¸ÖÖÌØÊâÆÁÄ»
......