摘要:
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) grp1: TGroupBox; edt1: TEdit; btn1: TButton; btn2: TButton; btn3: TButton; btn4: TButton; procedure btn1Click(Sender: TObject); ... 阅读全文
摘要:
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ActnList, ComCtrls, ExtCtrls;type TForm1 = class(TForm) btn1: TButton; grp1: TGroupBox; btn2: TButton; grp2: TGroupBox; lbl1: TLabel; actlst1: TActionList; l... 阅读全文