YYYQG 发表于 2021-3-16 10:53

求大神看下,这是用的什么编程语言

    procedure OrderDtlKeyDown(var Key: Word; Shift: TShiftState);   function GetqryPurchaseTemp: TADOQuery;   function GetqryProduceTemp: TADOQuery;   function GetqryProColorTemp: TADOQuery;   function GetqryOtherCostTemp: TADOQuery;   procedure PurchaseFieldOnChange(AField: TField);   property qryHdrTemp: TADOQuery read GetqryHdrTemp;   property qryDtlTemp: TADOQuery read GetqryDtlTemp;   property qryPropTemp: TADOQuery read GetqryPropTemp;   property qryMarkTemp: TADOQuery read GetqryMarkTemp;   property qryPurchaseTemp: TADOQuery read GetqryPurchaseTemp;   property qryProduceTemp: TADOQuery read GetqryProduceTemp;   property qryProColorTemp: TADOQuery read GetqryProColorTemp;   property qryOtherCostTemp: TADOQuery read GetqryOtherCostTemp;   //设置批次中的折扣额   procedure CalcAmount;   procedure CreateContract;   procedure DeleteContract;   procedure ChooseMaterialColor(iColorCategory: integer);

xieyulin 发表于 2021-3-16 10:57

看起来是dephi吧

yulinsoft 发表于 2021-3-16 10:58

yanlusu 发表于 2021-3-16 11:43

delphi, object pascal

sxwa059587 发表于 2021-3-16 12:57

pascal语言

姜子牙 发表于 2021-3-16 12:59

遇到这种问题大佬第一时间是想到如何解决这类问题呢? 就这种 这是什么语言之类的问题

小泽弟弟 发表于 2021-3-16 17:58


pascal语言
页: [1]
查看完整版本: 求大神看下,这是用的什么编程语言