lazarus

0熱度

1回答

如何在Indy/Lazarus上正確關閉TIdTCPServer，如果我們在GUI中按下「關閉」按鈕？感謝您的幫助！（更改我的原始問題）如何在客戶端斷開連接時關閉TIdTCPServer？應該例外處理什麼？ IO的工作原理，但它有點不穩定。這裏是代碼如下： unit pt_socket; {$mode objfpc}//{$H+} interface uses Cla

1熱度

1回答

爲什麼我不能在Lazarus中使用「data」作爲變量名稱

我試圖從wav soundfile中讀取數據。 soundfile中的數據以塊分佈。每個塊都以char的數組[0..3]開始。我無法找到「數據」塊。首先，我認爲這是在尋找功能（soFromBeginning soBeginning problem）或類型不匹配。經過長時間的搜索後，發現問題在我更改變量名稱時消失了。這裏是儘可能簡化的問題的程序。 procedure readwavformatte

0熱度

1回答

拉撒路：如何從一個文本到表導入數據？

我得到包含以列格式的數據的文本文件，通過;分離（該文件的來源是被R創建並保存爲一個文本數據幀一個）。 Name; Date; Results; Score; John; 1; 100; 1 John; 3 ; 200; 1 John; 5; 30; 9 Mike; 1; 90; 2 Mike; 3; 34; 10 Mike; 5; 216; 1 ... 我想將這些數據框導入到La

1熱度

1回答

在StringGrid中撤消動作

我在表單中有一個StringGrid，當我按Button1時，我移動了此網格中的一些單元格。這裏有一個例子：當我按下Button1，我從情況的去情況B.但我希望能夠做相反的事情太多：我的意思是我當我按下名爲Button2的另一個按鈕時，喜歡從B到A. 我想創建類似「撤消」按鈕的東西。我怎麼能這樣做？我正在使用拉撒路。我只需要做1次撤銷。下面是移動StringGrid的細胞的過程： proced

-3熱度

1回答

FPC/Lazarus和Android的發展？

嗨，我聽說過一些關於組件拉撒路開發Android應用 ...我瞭解帕斯卡爾非常好，我不確定它是否會更容易學習Java或在Pascal中創建應用程序...您怎麼看？與Pascal一起工作並在其他方面做些什麼或學習Java會更好？這就是我的問題， THX的反應

3熱度

3回答

Lazarus Pascal蜂鳴聲命令

我在Windows上運行Lazarus。我真的想讓節目「嗶嗶」。看來，你可以這樣做在帕斯卡使用： windows.beep(300,500); 但不是在拉撒路！是否有另一個我可以使用的命令？更新： sysutils.beep() 這工作，但我真的很想設定的頻率和聲音

0熱度

1回答

德爾福圓角邊框按鈕

我正在開發一個非常重要的項目的遊戲，我需要一些按鈕在我的窗體中。順便提一提，這些按鈕必須是圓形的。我的意思是：圖片顯示的是我期待的。我已經在互聯網上發現了這個過程，人們說，它的工作原理相當不錯： procedure DrawRounded(Control: TWinControl) ; var R: TRect; Rgn: HRGN; begin with Co

0熱度

1回答

PopupMenu在DLL中不顯示

我正在開發Lazarus 1.2.4/FreePascal 2.6.4中的「PL/SQL Developer」IDE（來自Allround Automations）的插件。該插件是一個x86 DLL。到目前爲止一切工作都很好，除了一件事。這裏的設置：我有一個TForm與TTreeView並在其上一個TPopupMenu組件。 TPopupMenu組件被分配給TTreeView.PopupMen

0熱度

2回答

拉撒路OSX獅子「無法加載Oracle客戶端庫libociei.dylib」

拉撒路1.2.4（FPC 2.6.4）的Oracle XE 11.2 Oracle即時客戶端32位（基本& SQLPLUS）我已經能夠使用設計器中的Lazarus TOracleConnection連接Windows 7和CentOS Linux。當試圖在OSX Lion中做同樣的事情時，我得到「無法加載Oracle客戶端庫libociei.dylib。是否安裝？」它位於/ Library/O

0熱度

1回答

lNet（FreePascal/Lazarus）：SendMessage後斷開

我遇到問題。我正在使用名爲「Client」的TLTCPComponent。代碼如下： procedure TForm1.Create(Sender: TObject); begin Client.Connect(ServerIP, Port); //ServerIP and Port are given... Client.SendMessage('SomeText');