摘要:
FConn.ProviderName := FProviderName; if FConn.ProviderName='SQL Server' then begin FConn.SpecificOptions.Values['Provider'] := 'prDirect'; FConn.Speci 阅读全文
摘要:
1.冒泡排序:从小到大 procedure BubbleSort(var N:array of integer); var I,J,IntTemp:integer; begin for I := 0 to High(N) do begin for J := 0 to High(N)-1 do beg 阅读全文