Download Winsoft Camera v2.7 Full Source for Delphi/C++ Builder 7 - 11 and Lazarus

Winsoft Camera v2.7 Full Source for Delphi/C++ Builder 7 - 11 and Lazarus

Winsoft Camera v2.7 Full Source for Delphi/C++ Builder 7 - 11 and Lazarus
Winsoft Camera v2.7 Full Source for Delphi/C++ Builder 7 - 11 and Lazarus


Delphi and C++ Builder camera component for Windows.

Uses DirectShow 9 API
Supports Windows 32 and Windows 64
Available for Delphi/C++ Builder 7 - 11 and Lazarus 2.0.12
Source code of component is included in registered version
Royalty free distribution

How can I set auto focus mode?
if foContinuousVideo in ACamera.SupportedFocusModes then
Camera.FocusMode := foContinuousVideo;
How can I rotate still image retrieved from camera?
procedure TFormMain.ACameraPictureTaken(Sender: TObject; dаta: TArray);
var
Stream: TBytesStream;
Bitmap: TBitmap;
begin
// write original image
TFile.WriteAllBytes(TPath.Combine(TPath.GetPublicPath, 'picture_' + FormatDateTime('yyyymmdd_hhnnss', Now) + '.jpeg'), Data);

// rotate image and write it
Stream := TBytesStream.Create(Data);
try
Bitmap := TBitmap.CreateFromStream(Stream);
try
Bitmap.Rotate(90);
Bitmap.SaveToFile(TPath.Combine(TPath.GetPublicPath, 'picture_' + FormatDateTime('yyyymmdd_hhnnss', Now) + '_rotated.jpeg'));
finally
Bitmap.Free;
end;
finally
Stream.Free;
end;
end;


Only for V.I.P
Warning! You are not allowed to view this text.
  • 20