unidac

    1熱度

    2回答

    我發現Delphi的FormatFloat函數有一個奇怪的行爲。讓我來展示案例研究。要轉換 值:129809.495 格式化輸出期望:129,809.50 情況1:從將字符串轉換 var str: string; str := '129809.495'; str := FormatFloat(',0.00', StrToFloat(str)); // output is 129,809.50

    0熱度

    1回答

    我在將Devart UniDac連接到嵌入式mySQL數據庫時遇到問題。 代碼雲: basedir := GetCurrentDir + '\mysql'; UniConnection1.ProviderName := 'MySQL'; UniConnection1.Database := 'razrednici'; UniConnection1.SpecificOptions.Values

    -2熱度

    1回答

    這是項目源: Application.Initialize; Application.MainFormOnTaskbar := False; Application.ShowMainForm := False; Application.CreateForm(TMain_Form, Main_Form); Application.CreateForm(TDat

    0熱度

    1回答

    如何在UNIDAC中插入多行SQL /批處理等於FIREDAC? Firedac例如: FDQuery.ParamByName ('NAME') AsStrings [0] = 'MARIA'; FDQuery.ParamByName ('NAME') AsStrings [1]: = 'JOHN'; FDQuery.ParamByName ('NAME') AsStrings [2]: =

    1熱度

    2回答

    早上好人!在我的系統上,從Firebird 2.5遷移到3.0之後,許多報告和其他功能開始出現問題,說明預期的是Integer,而當前的是LargeInt。我看了一下,看到一些3.0中count的搜索返回一個Bigint列,而在2.5中返回一個Integer列。 爲了解決我所知道的問題,我必須對出現錯誤,測試和工作的所有事情施以強制性表演,但這是一個很大的系統,它會帶來很多工作。 有沒有人知道任何

    0熱度

    1回答

    我能夠獲得我的存儲過程(UniStoredProc1)應該從SQL Server接收的所有字段。 這是存儲過程: declare @Navadna int ... select @Navadna = COUNT(diet) from Mytable where diet ='1'; ... select @Navadna 查詢生成_COLUMN1作爲結果字段。 現在在Delphi中,使

    0熱度

    2回答

    我想執行運行時生成的交易中的SQL命令,是沒有問題的,但如果條件爲真我應該開始這項交易,例如: SQLText := 'IF (SELECT COUNT(ID) FROM desk_table WHERE Status = 1 AND Number = ' + IndDeskGrid.DataSource.DataSet.FieldByName('Number').AsString

    1熱度

    1回答

    我已經使用了Delphi一年的UniDac VCL組件,但最近開始使用SQL Server 2012開發一個相當大的項目,我想在不同的方案中分開表和存儲過程,我的整個邏輯是因此存儲過程中沒有查詢的程序中只有存儲過程的名稱和參數。 的問題是,當我從dbo改變我的存儲過程的模式,讓我們說SchemaA,然後嘗試從德爾福運行它TUniStoredProc組件發現它ProcedureName而不是Sche

    0熱度

    1回答

    我有一個關於unidac的uniQuery問題: 時uniQuery開放,如果DataSource組件連接,該DataSource.onDataChange會觸發2次,ADOQuery觸發僅有1時,爲什麼呢? 環境: uniDAC:6.4,7; 德爾福:7,XE 10.1柏林

    -1熱度

    1回答

    我想在嵌入Firebird中創建表格並設置一個自動增量列,但是我不能。我可以創建表格,但不能爲自動增量設置列。 我使用: 火鳥嵌入式2.5 德爾福XE3 UniDAC Componnent 我的SQL命令: with UniSQL1 do begin SQL.Text := 'Create TABLE tab1(EMP_NO EMPNO NOT NULL, '+ 'F