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

delphiѧϰ

 1.[Error] DCansactionIformationManagement.pas(171): String literals may have at most 255 elements
[Fatal Error] DCMain.pas(32): Could not compile used unit 'DCansactionIformationManagement.pas'
±¨´í£º‘²»Õý³£¶¨ÒåÁ˲ÎÊý¡£ÌṩÁ˲»Ò»Ö»ò²»ÍêÕûÐÅÏ¢’
½â¾ö·½·¨£ºÓï·¨
Êý¾Ý¶¨ÒåÒªÒ»ÖÂ
2.Edit19.Text:= FieldbyName('SQTcost') ¶ÁÈ¡Êý¾Ý
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, ComCtrls, TeeProcs, TeEngine, Chart, DbChart,
  ExtCtrls, Series
3.maskedit1.text:=datetostr(Date()); »ñÈ¡µ±Ç°ÈÕÆÚ
¼ÓÒ»¸ötimer¿Ø¼þ£¬systemÀïÃæÓУ¬ÊÇÒ»¿é±íµÄÑù×Ó£¬ºÇºÇ¡£
Ë«»÷½øÈëontimerʼþ£¬È»ºóдÏÂÄãµÄ´úÂ룺
Statusbar1.Panels[0].Text:='ϵͳÈÕÆÚ£º'+datetostr(Now)£»
Statusbar1.Panels[1].Text:='ϵͳʱ¼ä£º'+timetostr(Now)£»
OPENÖ»ÓÃÀ´SELECT
EXECSQL ÓÃËùÓеÄ
prepared¸æËß·þÎñÆ÷×¼±¸Òª¸É»îÁË
Óзµ»ØһЩ¼Ç¼µÄÓÃOPEN
²»ÐèÒª·µ»Ø¼Ç¼µÄÓÃEXECSQL
¾ÍÊÇ˵һ°ãÓÃselect ÒªÓÃOPEN
¶øÏñinsert .dropµÈÖ»ÒªÓÃExecSql
4.GetCursorValues(tmpX,tmpY);  { <-- get values under mouse cursor }
      Label1.Caption:=GetVertAxis.LabelValue(tmpY)+
                      ' '+
                      GetHorizAxis.LabelValue(tmpX);»ñÈ¡×ø±êÖµ
5.¹ö¶¯ ´úÂë  procedure TDemoForm.SpeedButton1Click(Sender: TObject);
begin
  HorizScroll(10);
end;
procedure TDemoForm.SpeedButton4Click(Sender: TObject);
begin
  HorizScroll(-10);
end;
procedure TDemoForm.SpeedButton2Click(Sender: TObject);
begin
  VertScroll(-10);
end;
procedure TDemoForm.SpeedButton3Click(Sender: TObject);
begin
  VertScroll(10);
end;
6.Çå³ýϵÁУºif dbchart1.SeriesCount>=0 then
  begin
  for i:=0 to dbchart1.SeriesCount-1 do
    begin
    &nbs


Ïà¹ØÎĵµ£º

delphi KOL Ìåϵ

Ò»¡¢KOLÊÇʲô?KOLÄÜ×öʲô? MCKÊÇʲô?MCKÄÜ×öʲô?
KOLÊÇÒ»Ì׶ÔÏó¿â£¬Ãâ·Ñ¶øÇÒ¿ª·ÅÔ´´úÂ룬´ó¼Ò¿ÉÒÔhttp://www.kolmck.net/È¥ÏÂÔص½
Ëü¡£ËüÄܹ»Ê¹Delphi±à³ö³ß´ç·Ç³£Ð¡µÄ32λWindowsͼÐÎÓû§½çÃæµÄÓ¦ÓóÌÐò¡£
Ä¿Ç°Ö§³ÖµÄDelphi°æ:Delphi6,Delphi5,Delphi4,Delphi3ºÍDelphi2¡£
ʹÓÃKOLÔÚD2-D5ÖбàдµÄ×îСͼÐνçÃæ³ÌÐò ......

֪ʶС½á(Delphi)

1) Error loading midas.dll     ûÓÐ×¢²ámidas.dll ÔËÐÐRegSver32.exe midas.dll
2)Result := GetProcAddress(FGDIPlusLibrary, PChar(ProcName));±àÒë ³öÏÖÕâÑùµÄÎÊÌ⣬Ӧ¸ÃÊÇÉèÖ÷½ÃæµÄÎÊÌ⣬Project->Options->Complier->Hugestrings ¹³ÉϾÍokÁË£¡
3) TCheckListBoxÓиöitemEnable ......

¸øDelphi¿Ø¼þÉèÒ»¸öͼ±ê

·½·¨Ò»£º
¿Ø¼þÀà½Ð×ö   TABC,ÎļþÃû½Ð abc.pas ÄÇôн¨Á¢Ò»¸öÎļþ½Ð
abc.rc
ÀïÃæÄÚÈÝÊÇ
TABC Bitmap icon.bmp
icon.bmp ¾ÍÊÇͼƬÎļþÃû£¬²»Òª³¬¹ý256É«£¬24x24
È»ºóÔÚÃüÁîÐÐÏÂÖ´ÐÐ brcc32 abc.rc¾Í»áÉú³É abc.res
¸ÄÃûΪ abc.dcr
´ò¿ªÄã¿Ø¼þµÄ dpkÎļþ£¬ ¼ÓÉÏ {$R ABC.DCR}
ÖØбàÒë¾Í¿ÉÒÔÁË¡£
±ã½Ý·½ ......

ÓÃdelphi°ÉÒ»¸öwordÎĵµ×·¼Óµ½ÁíÍâÒ»¸öwordÎĵµÖÐ

uses ComObj;
var WordApp: Variant;
begin
WordApp := CreateOleObject('Word.Application');
WordApp.Documents.open('c:\1.doc');
WordApp.Selection.InsertFile('c:\2.doc','',False,false,false);
WordApp.Selection.InsertFile('c:\3.doc','',False,false,false);
WordApp.ActiveDocument.SaveAs('C:\4.doc' ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ