delphi-xe8

3熱度

2回答

雖然調用Windows API函數封裝一樣ExtractShortPathName後使用GetLastError我注意到，GetLastError不管調用ExtractShortPathName是成功還是失敗返回非零錯誤代碼。實際上，在我的程序執行之前，似乎有一個「最後的錯誤」，例如， program TestGetLastError; {$APPTYPE CONSOLE} {$R *.re

-2熱度

2回答

如何在delphi中使用MultiByteToWideChar？

我想使用MultiByteToWideChar，但我得到'未聲明的標識符'。它在哪裏宣佈？哪個'使用'？我正在使用Embarcadero Delphi XE8。

-1熱度

1回答

Delphi的繼承重疊：在創建子見父親

就是這種情況： 3 involucrated：一個myComponent的部件，一個祖先形式和子形式：（編輯） MyComponent的： unit Component1; interface uses System.SysUtils, System.Classes, Vcl.Dialogs; type TMyComponent = class(TComponent

0熱度

1回答

定時器導致鎖

誰能告訴我爲什麼這段代碼導致我的應用程序停止響應。我的應用程序調用一個COM庫。我等待COM庫事件觸發，以便繼續。我用一個定時器，以保持檢查是否COM庫解僱： procedure MyTimer(hWnd: HWND; uMsg: Integer; idEvent: Integer; dwTime: Integer); stdcall; begin //writeln('Timer

1熱度

1回答

TVirtuailStringTree文字和圖像對齊

我在tvirtuailstringtree繪製文本和圖像，如onbeforecellpaint事件之後 begin Textrectplace := NewRect; Textrectplace.Left := Textrectplace.Left + 2; Textrectplace.Width := 24; Textrectplace.Height := Data.image.heig

-1熱度

2回答

RAD Studio XE8表現得很奇怪

我正在使用RAD Studio XE8當按下輸入IDE中的文本行時沒有移動到下一行，或者當我按下空格鍵時，它開始刪除空格後面的文本。

0熱度

3回答

方法不再起作用

在我使用的方法描述here放置在Delphi上TStatusBar一個TProgressBar過去：（？最近的Windows更新後） procedure TForm1.FormCreate(Sender: TObject); var ProgressBarStyle: integer; begin //enable status bar 2nd Panel custom d

0熱度

1回答

如何使用Firemonkey訪問Windows平板電腦上的相機？

就像我在標題中寫的那樣，我想從Windows平板電腦上拍照，但沒發現它是怎麼做的。 Firemonkey應該允許多平臺開發，但我發現拍照的所有東西都只能在Android和iOS上使用。由Embarcadero here給出的示例在Windows上不起作用，看起來Windows不能識別事件TakePhotoFromCameraAction1，因爲任何具有此操作的按鈕都不會出現在窗體上。我也試過t

0熱度

1回答

選擇DBListbox項目在不同的顏色和插入文本

我能夠使用它的樣式改變DBCombobox物品的顏色csOwnerDrawFixed類似 How do I draw the selected list-box item in a different color? procedure TForm1.DBComboBoxDrawItem(Control:TWinControl; Index: Integer; Rect: TRect; S

0熱度

1回答

在delphi中爲頁面動態設置可見屬性

我使用的TAdvToolBarPager與許多頁面（AdvPage1，AdvPage2，AdvPage3 ...）。每個頁面包含許多編輯，導航器等。基於用戶權限，我想約束屬性，即對於ADMIN我想顯示所有頁面（1,2,3），但對於USER我只想顯示頁面（1,2）或（1）。我可以使用下面給出的代碼禁用所有編輯，導航器。有人可以幫助我如何在TAdvToolBarPager visble基礎上設置頁面