原创 Delphi XE10編寫的《海康攝像機SDK測試DEMO》

type TShowStr = record X: Word; Y: Word; S: array [0 .. 43] of AnsiChar; end; type TCamera = record