delphi

-1熱度

1回答

在德爾福10我有一個FormA調用一個iTask（線程）「Tarefaproc」內的Oracle存儲過程。這個存儲過程更新了一個表，Tchart將在另一個FormB中使用。我只是這個iTask Tarefaproc後調用FormB但是，它不工作，它被凍結的應用程序！感謝您的幫助，瞭解並解決此問題。見我的代碼： procedure TFormA.SpeedButtonChamaGrafico(S

-2熱度

2回答

For循環在達到目標後繼續前進。德爾福

這個問題只出現在數字上，更大，然後12包括。這兩張照片在一次拍攝。它甚至可能如何？ For循環必須從0到12-1 = 11，不是嗎？不過，當我使用while循環代替時，它工作正常。是我的錯還是德爾福的？ P.S.密碼下行。 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Gr

0熱度

1回答

Indy TCPServer Freeze：Active => False

我試圖找到爲什麼我的應用程序凍結時，我運行： IdTCPServer1.Active：= False; 當沒有客戶端連接時，沒有問題。當一個或多個客戶端連接時，它會凍結。如果有人能找到我犯了錯誤的地方。（我是新來的Delphi，如果你看到別的東西錯了，或以錯誤的方式做......告訴我） TLog = class(TIdSync) protected FMsg: S

0熱度

1回答

使用本地var的API調用會導致fn返回後的訪問錯誤（CheckTokenMembership）

在下面的示例中使用外部函數CheckTokenMembership從SO中獲得訪問錯誤後函數IsUserAdmin返回到IsUserAdminStr。當b是局部var到n時，IsUserAdmin之後會立即出現訪問衝突。如果b是全局變量，那麼它工作。刪除CheckTokenMembership停止錯誤。 FreeSid(AdministratorsGroup)沒有效果。 Changing to

0熱度

1回答

Shellexecute並等待並保持控制檯窗口打開？

在Delphi 10.1中，我需要執行另一個外部控制檯程序，並等待其他外部控制檯程序終止。但其他外部控制檯窗口在完成其工作後應保持打開狀態。現在我用這個JCL（JEDI）功能： ThisShellExecResult := JclShell.ShellExecAndWait( ThisProgram, // Filename ThisParameters, // Parame

1熱度

1回答

Delphi MediaPlayer歌曲停止通知

我需要在Delphi7應用程序中嵌入一個普通的MP3播放器。我會簡單地掃描一個目錄並以隨機順序播放所有文件。我發現了兩種可能的解決方案：一種使用Delphi MediaPlayer，一種使用PlaySound Windows API。沒有工作。該問題似乎是在缺少「停止」通知。使用PlaySound這樣的： playsound(pchar(mp3[r].name), 0, SND_ASYN

6熱度

1回答

德爾福 - 如何創建一個通用的REST呼叫

使用Delphi西雅圖。我有一個應用程序，它可以進行各種REST調用。其中一些調用可能會通過JSON返回10-20行，而其他調用可能會返回30-40行。我已將REST服務器設置爲以1,000個批次返回行。當數據返回到我的客戶端時，我使用RestDataAdapater，DataSource和客戶端數據集來公開數據，就好像它是本地表一樣。這部分似乎工作正常。如果我們在1000行的末尾，則更改URL並

0熱度

1回答

如何使用Indy Mime編碼二進制數據？

我有一個Ansi字符串，我用它來存儲二進制數據 - 在0-255範圍內的字節（我知道它應該是一個字節數組左右，但它們之間差別不大）。我想通過Indy MIME（TIdEncoderMIME.EncodeString/TIdDecoderMIME.DecodeString）傳遞這個「二進制字符串」，並獲得一個人類可讀的字符串。我認爲如果我使用IndyTextEncoding_8Bit編碼，Enc

2熱度

2回答

Delphi 7 - 如何用畫筆填充圓角矩形？

我正在嘗試使用Canvas繪製類似Dialog的窗體。我可以在其中放置圓角邊框和圓角矩形作爲標題/標題。我只想用畫筆填寫標題。不過，我努力填補這個稱號。當使用FillRect時，所有Form都會重新粉刷。試圖在這裏搜索，所以如果我錯過了，只要指出我去哪裏。否則，我該怎麼做？使用Delphi 7，OnPaint事件。 procedure TCustomDialog.FormPaint(Sender

2熱度

2回答

爪哇 - 匹配重讀單詞

我試圖創建一個詞法分析器使用Java德爾福。這裏的示例代碼： String[] keywords={"array","as","asm","begin","case","class","const","constructor","destructor","dispinterface","div","do","downto","else","end","except","exports","file