delphi 7编程中的入门问题
发布网友
发布时间:2022-04-26 08:33
我来回答
共4个回答
热心网友
时间:2022-06-25 21:12
如果是你自定义的函数就要自己去输入的;
系统已有的,你可以在Object Inspector哪里看看有没有:sysmenu ;如果有,双击就会转到代码窗口里面了;
热心网友
时间:2022-06-25 21:13
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
procere FormCreate(Sender: TObject);
procere sysmenu(var msg:twmmenuselect);Message WM_SysCommand;//系统菜单自己添加的
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procere TForm1.FormCreate(Sender: TObject);
var
i:Integer;
begin
i:=GetSystemMenu(handle,False);
AppendMenu(i,MF_SEPARATOR,0,nil);
AppendMenu(i,MF_STRING,100,'我的菜单(&E)');
end;
procere TForm1.sysmenu(var msg:twmmenuselect);
begin
If msg.IDItem=100 then
ShowMessage('您选择了自己添加的菜单项!')
Else
Inherited;
end;
end.
热心网友
时间:2022-06-25 21:13
选中 form 可以在 Object 窗口 里面 Event 里面 各种事件 写上事件名 在看代码 窗口 就自动生成了 如果没修改就保存 就会自动去掉 生成的代码
热心网友
时间:2022-06-25 21:14
syms e u;
h=exp(1i*sqrt(2*e-u^2));
g=int(h,'u',0,1);
ezplot(e,g)