一个问题请教

Question

可以。
FORM1运行后置一变量为true，下次运行前检查此值，如为true，直接调用Form2.

Answer 1

将这些信息记录在注册表中或一个Ini文件中，然后每一次启动时读取这个值判断是否显示Form1.
存取注册表使用TRegsitry、TRegsitryIniFile类。
存取Ini文件使用TIniFile类。

Answer 2

form1运行后置一变量为true,怎么保存呢？
只有通过注册表吗？

Answer 3

可以用ini文件，或者干脆用一个文本文件，向里面写一个值，下次启动就读这个文件来判断条件，这和用注册表或ini文件的方法是一样的

Answer 4

first if you can edit the resourse file.
the main file you can see the procedure of creating window
you can call the funtion tform.create to constuctruct the window
and before you create the second window you can delete the first window

Answer 5

现在还没有想到，读写一个小文件也不难啊，或者给你一段读写注册表的代码
var
  reg : TRegistry;
  i : Integer;
begin
  // Call base class
  RootKey := HKEY_CURRENT_USER;
  KeyName := REG_SETTINGS;
  Result := inherited LoadSettings;
  // Create a TRegistry object
  reg := TRegistry.Create;
  // Set the RootKey
  reg.RootKey := HKEY_CURRENT_USER;
  // Open the key where settings are stored
  reg.OpenKey(REG_SETTINGS, True);
  // Add a button in the QuickBar for each value stored in the registry
  i := 0;
  while reg.ValueExists(IntToStr(i)) do begin
    AddButton(reg.ReadString(IntToStr(i)));这里读取注册表里的键值，写用writestring(..);    i := i + 1;
  end;
  // Close the key
  reg.CloseKey;
  // Free the TRegistry object
  reg.Destroy;
end;