Skip to content

Ip Camera Demo #12

@dlara

Description

@dlara

hi, im trying to run latest version 2.47 with the IPCamera Demo(vlc and multidemo) but none of them works. This part

capture := cvCreateFileCapture(pAnsiChar(rtsp));
if Assigned(capture) then

always return capture = nil so never enter inside the if statment.
I have not previous version of Delphi-OpenCV so i cant test it. It seems to be a problem with the highgui library.

Thank you for your great work.

Regards

Edit: I found this function that could be of help for someone (http://casper123189.blogspot.com.es/2013/01/tbitmap2iplimage-iplimagetotbitmap.html) With this i can capture a snapshot thorugh indy+http and then put it into the correct pointer for opencv:

function TBitmap2IPLImage(srcBmp: TBitmap): PIplImage;
begin
Result := cvCreateImage(cvSize(srcBmp.Width, srcBmp.Height), IPL_DEPTH_8U,3);
Result.Origin := IPL_ORIGIN_BL;
CopyMemory(Result.ImageData, srcBmp.ScanLine[srcBmp.Height - 1],Result.ImageSize);
end;

Metadata

Metadata

Assignees

Labels

No labels
No labels

Projects

No projects

Milestone

No milestone

Relationships

None yet

Development

No branches or pull requests

Issue actions