vcl

-1熱度

2回答

我希望這樣的事情應該工作： Form2.Show(); Form1.Hide(); Form2.PageControl1.ActivePage := TabSheet1; 的事情是，我有多個按鈕（在第一種形式），我想對於每一個他們可以在PageControl的特定選項卡中打開新窗體。錯誤：Undeclared identifier: 'TabSheet1'

0熱度

1回答

爲什麼BringWindowToTop與VCL Ribbon結合不能正常工作？

我有以下（簡化的）過程，使所期望的窗口之上的所有其它正常窗口： function focusWindow(): boolean; var h: Hwnd; begin result := true; h := findwindow('Notepad', 'Unbenannt - Editor'); if h <> 0 then BringWin

0熱度

1回答

Delphi中的通知欄

我已經用Delphi編寫了一個應用程序。該軟件是通知欄。當出現通知時，還會顯示該軟件。只能顯示通知，不顯示軟件嗎？（如Windows 8.1 & 10和電報） VCL應用程序被編寫。謝謝。

0熱度

1回答

製作ShowHint工作與幾個不同的Rects，每個都有自己的提示

使用C++ Builder的2009年我有一個從TCustomControl繼承，關於這一點我畫幾個平方（TRect）與內容等自定義控制我現在想顯示提示，我將鼠標懸停在每平方，但我不知道如何實現這個最好的。我試圖簡單地用TCustomControl的ShowHint，並改變Hint我將鼠標懸停在廣場，但問題是，控制不顯示暗示了它第一次消失後，除非我離開的控制和回來到它。我希望我可以簡單地'

3熱度

2回答

TColorProperty Delphi Berlin 10.1.2？

我試圖組件德爾福7轉換爲德爾福柏林（的FlatStyle成分：https://sourceforge.net/projects/flatstyle/）源許多變化後，i'm停留在TColorPorperty 請看下圖： type TRxColorProperty = class(TColorProperty) public function GetValue: str

0熱度

2回答

C++與vcl：關閉輔助表單不會結束進程

我仍然在學習c + +與vcl表單，所以原諒我，如果我問的事實證明比看起來簡單。作爲參考，我在Windows環境中使用C++ builder 10.1 berlin。我有兩種形式的程序（讓我們稱之爲「MainForm」和「BackupForm」）。我在MainForm中接受用戶輸入，然後當用戶單擊某個特定按鈕（「DoSomething」）時，該操作設置了一些變量，然後調用BackupForm->

0熱度

1回答

TSQLQuery，中tfields和操作符[]

我有一個查詢，使用TSQLQuery即是這樣的 TSQLQuery* tq = new TSQLQuery(NULL); tq->SQLConnection = atdbDM->SQLConnection1; tq->SQL->Add("SELECT LAST_INSERT_ID();"); tq->Open(); int insert_id = tq->Fields->operator

0熱度

1回答

Brainf * ck解釋器奇怪的輸出

我決定用C++編寫一個簡單的Brainfu * k IDE，使用Borland的CppBuilder6。我已經把我的RichEdit放在了一起，使它看起來有點像記事本。然後我添加了TEdit輸入和TMemo輸出。經過一些測試，我認爲RichEdit在我的情況下是不好的組件，我將它改爲TMemo。在我的code input = Edit2，code = Memo2，output = Memo1。我

2熱度

2回答

TVirtualStringTree ScaleBy Stretch

我試圖讓VST在其高度和寬度改變時自動調整大小。我沒有與其他放置VCL組件的問題，其中一些有像TImage一樣的屬性「拉伸」，它可以讓它們自動調整。 VST保持固定並保持節點高度和列寬度。我看過Header-> hoAutoResize，hoColumnResize。在這個問題上，AutoSizeIndex <> -1不是很有用，因爲我需要每列都縮小。我想這就是爲什麼這些什麼都不做。將Aut

1熱度

1回答

是否可以使用`TDdeClientConv`類來枚舉所有可用的DDE服務器？

我對所有正在運行的DDE服務器感到好奇，試過TDdeClientConv類但感到困惑（可能只是沒有弄清楚如何），最後推出了我自己的低級（通常應用程序應該使用DDEML抽象層）「客戶端「： procedure TForm6.FormClick(Sender: TObject); begin { initiate DDE conversation with all top-level wi