回答问题:
1)题意不清。一个Form就有一个Unit。两个Form就有两个Unit。
在Unit2里面加入Uses Unit1,然后Unit1的公用变量就可以为Unit2使用了。
使用Form1 的Edit控件:Form1.Edit1.Text:='sdsddddddd';
2) 没使用过这个函数。
3)可能是字体设置的问题。查看Font属性下的Pitch是否为fpDefault
以下不知,省略。
1)题意不清。一个Form就有一个Unit。两个Form就有两个Unit。
在Unit2里面加入Uses Unit1,然后Unit1的公用变量就可以为Unit2使用了。
使用Form1 的Edit控件:Form1.Edit1.Text:='sdsddddddd';
2) 没使用过这个函数。
3)可能是字体设置的问题。查看Font属性下的Pitch是否为fpDefault
以下不知,省略。
解决方案 »
- DELPHI读硬盘号,各种\数据线的
- 买过DEIPHI线程书的进
- dbgrideh实现Treeview,但编辑的记录无法保存
- 关于一些类病毒隐藏技术的设想[转自看雪老论坛]
- 大家来看看,我读取注册表的问题,在线等待了!!!100
- 如何统计以查询好的结果?
- 在线等待,马上结帐 sql server查询两表所有值的问题,很简单,但没有找到答案
- 在那里可以下载Flash 最新版本?
- diamond ado 1.8安装失败。居然会拷贝文件失败。。:-(
- 请教:Timg控件怎么样把gif格式加进去?就象.ico一样的方便,我下了一个控件使用起来太麻烦了!
- 刚学dephi,搞定给分
- 求好的建议(采用后再给210分)!
Form2.Label1.caption:=Form1.Edit1.Text;
2)Delphi中没有SendKey这个函数。不过你可以自己实现。
3)设置窗体的Scale为False、Font.CharSet为GB2312_CHARSET即可。
4)你要是实在想换方法可用API函数SetWindowPos。具体用法看帮助。
5)那要拦截窗体消息较为复杂。较你一招,在窗体的OnCanSize里写一句Resize:=False;
6)解决不了
5)可设置Form的borderstyle为bsDialog
var
Form1: TForm1;
sForm1:string;
iForm1:integer;implementation使用:
procedure TForm2.FormCreate(Sender: TObject);
begin
sForm1:='china';
form2.Caption:=sForm1;
end;
3)将所有字体一律设成中文宋体,就可以了
如果不关闭form可以在另一个form中访问它的控件!
在设计form时将字体设为宋体并将字体集设为chinese_gb2312
第五个问题不太明白,好像没有区别!