請問一下... 我想用" "來控制當按下時Edit的focus會移到下一個Edit 而在Form的KeyDown()寫了 Perform(WM_NEXTDLGCTL,0,0); 請問要如何讓我按下" "時 單純向下一個Edit移動而不會在Edit內又打出一個" " 還有 我想用"-"來控制清除當前的Edit->Text 請問要怎麼樣知道現在的Edit名稱呢???

Using KeyPress is easier while KeyDown is similar and powerful (it can get the shift state, etc.), set Key to 0 (i.e. NULL). The name of the edit could be obtained as TComponent(Sender).Name within the event handler.

寫在onKeyPress吧

void __fastcall TForm1::FormKeyPress(TObject *Sender, char &Key)
{
  if (Key=' ')
  {
    Perform(WM_NEXTDLGCTL,0,0);
    Key=0;
  }
}

再請教一下...現在我知道 ActiveControl->Name; 可以得到目前Focus物件名稱 ((TEdit*)ActiveControl)->Text=""; 可以讓Edit清除 想請問一個Form上如果有各種元件 如何知道我現在Focus的是一個TEdit呢??? 我如果單純把((TEdit*)ActiveControl)->Text=""; 寫在KeyPress() 會把一堆東西都清空

如何知道我現在Focus的是一個TEdit呢??? if (String(ActiveControl->ClassName()) == "TEdit")