问两个问题。(50分)

ft · 2001-09-04

1.怎么在Delphi5中设置环境，使得每次打开时没有任何新项目。还有Environment
Option 中的Shared repository我也改为自己建的目录了，可是每次我重新运行，
打开的入口又变成Delphi默认的了！怎么回事？
2.procedure TForm1.Button1Click(Sender: TObject);
var
ColorDlg:TColorDialog;
begin
ColorDlg:=TColorDialog.Create(Form1);
ColorDlg.Execute;
Label1.Color:=ColorDlg.Color;
ColorDlg.Free;
end;
这段程序是使用ColorDilog的，我不明白的是：选择了颜色，确定之后，Label1
运行正确，可是当我选择了取消时，Label1却成了黑色的了！本来它该是保持原
来颜色不变的呀！该怎么处理？

请教，分数不多，不要嫌少，我就这么点！呵呵。

dlnew · 2001-09-04

if colordlg.execute then label1.color := colordlg.color;

ft · 2001-09-04

那该怎么该呢？colordlg有什么方法可以使取消生效呢？

卷起千堆雪tyn · 2001-09-04

to 1 :
你可以 FILE--NEW APPLICATION,然后在最上栏有一项“SAVE CURRENT DESKTOP”，
你保存起来，以后打开DELPHI时，就是你现在保存的界面了。

to 2 :

procedure TForm1.Button1Click(Sender: TObject);
var
ColorDlg:TColorDialog;
begin
ColorDlg:=TColorDialog.Create(Form1);
if ColorDlg.Execute then
Label1.Color :=ColorDlg.Color ;
ColorDlg.Free;
end;

ft · 2001-09-04

第二个解决了！谢谢，最后一起给你分。呵呵。

可是第一个好像不行耶！怎么还是会出现一个默认的项目，而我的意思是什么都不要
打开，只有Delphi的开发环境，还有那个Shared repository怎么好像不起作用！

goodpb1 · 2001-09-04

第一个问题只需要在你的D5
的快捷方式的命令行后面加上-np参数就可以了
"D:/Program Files/Borland/Delphi5/Bin/delphi32.exe"
改为"D:/Program Files/Borland/Delphi5/Bin/delphi32.exe -np"

ft · 2001-09-04

-np参数？我照做可是，改完之后确定说该快捷方式无效呀！

ft · 2001-09-05

那么，设置Open的路径总是可以的吧？每次从D:/Program Files/Borland/Delphi5/Bin
跳到自己的目录下，麻烦死了！

请教！

pengfeiyan · 2001-09-07

目标为：D:/DELPHI5/Delphi5/Bin/delphi32.exe /ns /np

（我的delphi装在d:/delphi5目录下，你要做相应改变。）

ns:no splash 不显示快闪屏幕

np:no project不加载项目

ft · 2001-09-07

多谢！不加载项目知道了。

请教Open路径怎么改？是Environment Option 中的Shared repository的？可是只能
维持一会呀！如果我重新打开D5就又回到D:/Program Files/Borland/Delphi5/Bin
中了。

我想的是，Open的是我自建的文件夹比如 D:/Temp 该如何设置？

Lyte Zeng · 2003-01-01

1：此问题你可以查查注册表看看。
2：
procedure TForm1.Button1Click(Sender: TObject);
var
ColorDlg:TColorDialog;
begin
ColorDlg:=TColorDialog.Create(Form1);
if ColorDlg.Execute then
Label1.Color:=ColorDlg.Color;
ColorDlg.Free;
end;

QQ989753 · 2003-01-04

QQ989753 · 2003-01-05

这么久的关注也没有来个说话的，看来，我还是把自己的馊招拿出来吧!
在Delphi的快捷方式中，把起始目录改为D:/,这样，你打开工程，或第一次保存工程时，
Delphi默认的工作目录就改为D:/了!献丑了，因为，这不是Delphi内部的东东，我只是借
Windows的花，来Delphi这个佛了!

问两个问题。(50分)

ft

Unregistered / Unconfirmed

dlnew

Unregistered / Unconfirmed

ft

Unregistered / Unconfirmed

卷起千堆雪tyn

Unregistered / Unconfirmed

ft

Unregistered / Unconfirmed

goodpb1

Unregistered / Unconfirmed

ft

Unregistered / Unconfirmed

ft

Unregistered / Unconfirmed

pengfeiyan

Unregistered / Unconfirmed

ft

Unregistered / Unconfirmed

Lyte Zeng

Unregistered / Unconfirmed

QQ989753

Unregistered / Unconfirmed

QQ989753

Unregistered / Unconfirmed

Similar threads