delphi

    -3熱度

    1回答

    我想寫一個支付接口到Delphi7編寫的現有win32程序。我沒有該程序的源代碼。我只是想將包含在金額1字段中的運行時間值發送到信用卡機器API。 實施例Amount1 = 50.00 金額1是TEDIT字段 我已經考慮COM,名字管道共享存儲器等。我發現的例子假設我有源代碼。 一個DLL或Ocx? 任何意見,幫助或例子將不勝感激。

    -2熱度

    2回答

    任何人都可以請幫助我在Delphi中的這個話題? 我有5個嵌套的「for」塊循環迭代變量k1,k2 .. k5。 另一個變量k必須控制5個以上循環的深度。該變量在運行時定義。 是否有可能消除k塊內部'for'塊的執行,就好像它們已被評論一樣?解釋碼的短列表是在這裏: k := 2; for k1 := 1 to 100 do begin for k2 := 1 to 100 do be

    0熱度

    1回答

    我的應用程序有用於剪切,複製和粘貼的菜單項。我知道如何執行這些操作,但不知道如何確定是否選擇了某些東西。我需要知道這個啓用或禁用剪切和複製菜單項(我將在TAction.OnUpdate事件中執行)。 例如,若要從當前的重點控制選定的文本,我用這個: if Assigned(Focused) and TPlatformServices.Current.SupportsPlatformService(

    1熱度

    2回答

    我正在添加一些功能來形成不是由我創建的。它有加載和加載按鈕,我想通過點擊執行我添加的代碼的按鈕來測試一切是否正常。我知道這個按鈕的名字,但我不知道它在表格上的位置。 現在我滾動窗體的所有組件查找此按鈕。如果我在第一次查找時想念它,我必須重新開始。它很煩人,需要很長時間。 有沒有簡單的方法?像「查找組件」菜單項,這將直接帶我到那個按鈕(或標籤,或任何真正的)。

    0熱度

    1回答

    iexc := round(iexc/icount); iint := round(iint/icount); inau := round(inau/icount); iovr := round(iovr/icount); adoquery1.SQL.Text := 'update Tickets_Tbl set Excitment = iexc wher

    -5熱度

    1回答

    基本上,我有一個輸入,我想驗證用戶輸入是否使用了3個或更多來自qwerty鍵盤佈局的連續字母。我的意思是Q-W-E或Y-U-I-O-P。首先,我將用戶輸入存儲在一個字符串變量中,並使用ansiLowerCase函數將輸入轉換爲小寫。我搞砸了將qwerty佈局聲明爲一個常量字符串,並使用strscan函數,但無濟於事。任何幫助將不勝感激,謝謝。

    1熱度

    1回答

    我已經做了一個IdFTP從我的FTP服務器上下載文件,但是當我嘗試使它變爲螺紋時,它陷入了Android操作系統中的「正在解析主機名...」。 無螺紋(工作正常): uses ..., IdFTPCommon; var RecordDownload: TMemoryStream; uses System.IOUtils; procedure TForm1.Button1Cli

    0熱度

    1回答

    我有連接到SQLLite dB的TFDConnection一個數據模塊窗體上的問題與TFDQuery。 datamodule上的查詢正常工作。但是,如果我有連接到該數據模塊的連接設置活動時,在窗體上查詢到真正的我得到的錯誤: exception message : [FireDAC][Comp][Clnt]-512. Connection is not defined for [FDQuery1]

    2熱度

    3回答

    for counter := 1 to lengthofpassword do begin currentletter:=password[counter]; currentascii:=Ord(currentletter); if (96<currentascii<123) OR (64<currentascii<91) OR (47<currentasc

    -1熱度

    1回答

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