delphi-7

5熱度

1回答

我在Delphi 7中使用lkJSON-1.07 JSON文本，在他們的榜樣 js := TlkJSONobject.Create; js.Add('namestring','namevalue'); // get the text of object s := TlkJSON.GenerateText(js); writeln(s); writeln; writeln('mo

1熱度

2回答

計算兩個日期之間的天數

請幫我找兩天之間的日子。我有兩個對象TDBDateEdit date1和date2。 procedure Torder_form.date2Click(Sender: TObject); var d3: TDateTime; begin d3:=date2.date - date1.date; showmessage(datetostr(d3)); end. 我向d

0熱度

1回答

語法錯誤在SQL SELECT INTO FROM德爾福

我試圖插入新記錄到使用SQL我的數據庫，但它總是告訴我，我有一個語法錯誤在FROM子句。我看不出錯誤。下面是代碼： procedure TForm1.BitBtn7Click(Sender: TObject); var sCategoryName :string; begin sCategoryName := InputBox('Category Name', 'Please ente

-1熱度

1回答

導致訪問衝突

無法訪問的價值我有一個程序，使自行車(TObject) 當調用我的Create方法，我得到一個訪問衝突錯誤00453359和地址00000004的寫入。 constructor MyBike.Create(iPrice, iStroke, iYear, iCC: Integer; sName, sModel: string); begin fCC := iCC; // <-

3熱度

1回答

Delphi 7中的新編碼：無法讀取（）多個字符串

我最近開始在Delphi 7中編寫代碼，主要用於學校，但也用於個人娛樂。我遇到了一個我無法解決的問題。我想製作一個控制檯應用程序，要求您輸入幾個字符串，例如您的姓名和類似字符，以便應用程序稍後可以通過您的姓名給您打電話。不過，我很快意識到有兩個「read（）」由於某種原因，2個不同字符串的命令不起作用，每次都跳過第二個字符串的讀取命令。既然不能完全解釋，這裏是我能想到的最簡單的代碼顯示了問題： p

-1熱度

1回答

如何使用delphi在設計模式中添加標籤和編輯控件在設計模式中已存在的組合框

作爲我的要求之一，我必須在delphi中爲現有的組框添加標籤和編輯字段。但是有多少次，我在現有groupbox中添加了一個標籤，它會消失或者不會添加。有沒有其他方法可以做到這一點？我不知道爲什麼，但我可以添加編輯，但不是標籤

0熱度

1回答

使用SET和WHERE訪問表的更新記錄

我試圖允許簡單的MS Access表（tblCustomer）上的記錄更新。要編輯記錄和SET子句，用戶從組合框（cboSetField）中選擇一個字段名稱，並將文本輸入到關聯的文本框（txtSet）中。對於WHERE子句，用戶從組合框（cboWhereField）中選擇一個字段，並將文本輸入到關聯的文本框（txtWhere）中。因此，從本質上講，我有在下面的代碼是一個類似於： UPDATE tb

1熱度

1回答

Javascript和youtube API在德爾福

我想執行一個JavaScript的YouTube的api WebBrowser1。 procedure TForm1.FormCreate(Sender: TObject); begin WebBrowser1.Navigate(ExtractFilePath(ParamStr(0)) + 'test.html'); end; procedure TForm1.Button1Cl

0熱度

1回答

打印標籤dymo不起作用

我在Delphi中使用TDymoDrucker類來打印標籤。我已經使用Dymo Label v.8創建了標準標籤字段。在Labelform，我發送按鈕的點擊變量TDymo德魯克類 procedure TFormButton.Button1Click(Sender: TObject); var Print : TDymoData; begin PrintData.selec

-1熱度

1回答

在非德爾福PC上運行delphi應用程序

我正在構建一個使用delphi 7和ms access 2007作爲客戶端數據庫的應用程序。它運行在我的筆記本電腦（華碩）正常，但我複製整個項目文件夾並運行Project.exe後，它給我一個錯誤「磁盤寫入錯誤」。我試過使用谷歌搜索「磁盤寫錯誤delphi應用程序」，但只發現有關I/O錯誤。我的應用程序只在點擊子菜單時調用的窗體中打開一個文件後，所以我猜這不是I/O .. 解決方案是什麼？在此