Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

DelphiÖ®Tchart¿Ø¼þʹÓÃÐĵÃ

DelphiÖ®Tchart¿Ø¼þʹÓÃÐĵÃ
    ×î½üÔÚѧϰdelphi£¬×öÒ»¸öÈí¼þÁ·ÊÖ£¬Óõ½Tchart¿Ø¼þ£¬ÓÐЩ´ÖÂÔµÄʹÓÃÐĵ㬹©delphi³õѧÕ߲ο¼¡£
    TChartÊÇdelphiÀïÃæÒ»¸ö±ê×¼µÄͼÐÎÏÔʾ¿Ø¼þ¡£Ëü¿ÉÒÔ¾²Ì¬Éè¼Æ£¨at design time£©Ò²¿ÉÒÔ¶¯Ì¬Éú³É¡£¿ÉÏÂÔØSteema TeeChart 7£¬Ã»ÓÐÔ´´úÂ룬ÄÜÓþͺã¡
    ÓÉÓÚÎÒÒªÔÚͬһ¸öChart½çÃæÏÔʾ²»Í¬µÄͼÐΣ¬ÐèÒª¶¯Ì¬±à³Ìʵʱ»æÖÆÇúÏß¡£
    Ò»¡¢Ìí¼ÓSeries֮ǰ£¬ÒªÉ¾³ýÒÑÓеÄSeries£¬Ö»ÄÜ´ÓºóÍùǰɾ£¬·ñÔò³ö´í£º 
for i:=Chart1.SeriesCount-1 downto 0  do                    
  begin
    Chart1.Series[i].Free;
  end;
¶þ¡¢ÔËÐÐʱºò´´½¨Ò»¸öSeries, ÓжàÖÖ·½·¨¡£
1£®Var MySeries : TBarSeries ;
   MySeries := TBarSeries.Create( Self );
   MySeries.ParentChart := Chart1 ;
     2£®Chart1.AddSeries( TBarSeries.Create( Self ) );
     3£®Var MyClass : TChartSeriesClass;
        MyClass := TBarSeries ;
        Chart1.AddSeries( MyClass.Create( Self ) );
ÔÚÕâÀï¸ù¾Ý£¬Óõ½Ñ­»·½á¹¹¶¯Ì¬Ìí¼Ó¶àÌõSeries¡£
  for j:=0 to  NXUGMU-1 do
    begin
      series:=TFastLineSeries.Create(Chart1); 
      Chart1.AddSeries(Series);       //¶¯Ì¬Ôö¼Óseries
      series.LinePen.Width:=2;         //É趨Ïß¿í
      Chart1.Series[j].Title:='ËÙ¶È '+StrVelocity[j];  //¶¯Ì¬±êÌâ
      randomize;
    end;
Èý¡¢ÔÚchartÖл­³öµÄÇúÏßij¸öµãÉϱê¼Ç³ö¸ÃµãµÄÖµ
    series.Marks.Visible:=True;
    Series.Marks.Style:=smsValue;
ËÄ¡¢¹Ì¶¨TChartÖеÄ×ø±ê£¬²»Ê¹TChartÖеÄ×ø±ê¸úËæSeriesµÄ±ä»¯¶ø±ä»¯
//ÉèÖ


Ïà¹ØÎĵµ£º

Delphi CRC32УÑé

ÍøÉÏDownµÄÒ»¸öµ¥Ôª.×Ô¼º¸ÄÁËÏÂ. unit utCRC32;
interface
uses
Windows,SysUtils,Classes;
const //Crc32±í
Crc32Tab: Array[0..$FF] of LongInt =
($00000000, $77073096, $ee0e612c, $990951ba, $076dc419, $706af48f,
$e963a535, $9e6495a3, $0edb8832, $79dcb8a4, $e0d5e91e, $97d2d988,
$0 ......

SDL & Object Pascal (Delphi) [2] ÏÔʾÖÐÎÄ×Ö·û

һЩ»ù´¡µÄÎÊÌâÎÒ²»ÔÙ׸ÊöÁË£¬²éÔİïÖúÎĵµ£¨Object Pascal SDL Doc.chm£©ÏÔÈ»±ÈÔÚÕâ¿´ÎÒºú³¶ºÏÊʵöࡣÄÇЩ»­ÏñËØ£¬»ñÈ¡ÏñËØÐÅÏ¢£¬ÏÔʾBMPÎļþ¶àÊýʱºòÖ»Òª°ÑÄÇЩ´úÂë¸´ÖÆ¹ýÀ´»ù±¾¾ÍÄܹ¤×÷¡£ÏÂÃæËµµÄÊÇÔõÑùÏÔʾÖÐÎÄ¡£
ÆäʵSDL¼ÓÉÏttfÖ§³Öʱ£¨ÐèÒª½«¶ÔÓ¦µÄdllÎļþÌí¼Óµ½¹¤³ÌĿ¼ÀÊÇÍêÈ«¿ÉÒÔÏÔʾÖÐÎĵ쬼òÌåºÍ·±Ì嶼ûΠ......

SDL & Object Pascal (Delphi) [3] ÖÆ×÷Ò»¸öÑ¡µ¥


Ò»¸öÑ¡µ¥´óÖÂÊÇÕâÑù£º
1.¿ÉÒÔ±»ÒÔijÖÖÐÎʽºô½Ð³öÀ´£¬Èç°´ÏÂesc£»
2.ÔÚÕâ¸öÑ¡µ¥Öй¦ÄܼüÓв»Í¬µÄ¶¨Ò壬ÈçÔ­±¾·½Ïò¼ü¿ØÖÆ×ß·£¬µ«ÏÖÔÚ¸ÄΪ¿ØÖƹâ±êµÄλÖã»
3.°´ÏÂÈ·¶¨¼üºóÓжÔÓ¦¹¦Äܱ»Ö´ÐУ»
4.¿ÉÒÔ±»¹Ø±Õ¡£
ÄÇôÎҵİ취ÊDZàдÁ½¸ö×ӳ̣¬ÆäÖÐÒ»¸ö´¦ÀíÑ¡µ¥ÖеÄʼþ£¬ÁíÍâÒ»¸öרߺÔð»­Ñ¡µ¥¡£
ÔÚ´Ó²½ÐÐÇл»µ½Ñ¡µ¥ ......

Delphiµ÷ÊÔDLL ²»Äܵ÷ÊÔ ²»ÄܽøÈëµ÷ÊÔ ×¢Ò⣡£¡£¡

ÈçºÎµ÷ÊÔDLL£¬ÔÚÕâÀï¾Í²»ÔÙ׸ÊöÁË£¬µ«ÊÇ£¬½ñÌì¾ÍÅöµ½ÁËÒ»¸öÌØ±ðÆæ¹ÖµÄÎÊÌ⣬²ÎÊýÉèÖÃÕýÈ·£¬¾ÍÊDz»Äܵ÷ÊÔ£¿£¿ ͨ¹ýÉÏÍø²é×ÊÁÏ£¬·¢ÏÖÁËÎÊÌ⣬עÒ⣺
  1£¬ ½«ProjectÖ÷²Ëµ¥µÄProject Options¶Ô»°¿òµÄCompilerÒ³ÃæDebuggingÑ¡ÏîÖÐµÄ Debug informaton¡¢Local symbols¡¢Assertions¸´Ñ¡¿òÑ¡ÖÐ
  2£¬½«ToolsÖ÷²Ëµ¥µÄD ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ