ich versuche den Stream von 2 Webcams (bzw. erst einmal einer) in meine Unit bzw. in ein TImage einzubauen.
Das herunterladen auf die Festplatte, und dann das laden in das Image funktioniert wunderbar.
Wenn ich jetzt aber aber die direkte url von einem stream einbaue, funktioniert es nicht, da dieser ja eigentlich kein direktes jpg erzeugt.
Aber wie bekomme ich den Live Stream? Ich dachte da an einen Stream wie man unten im Code erkennen kann, aber ich bin da viel zu
Code: Alles auswählen
procedure TForm1.FormCreate(Sender: TObject);
var
response : TMemoryStream;
begin
response :=TMemoryStream.Create;
try
if HttpGetBinary('http://www.articnckalip.com/yonetim/img/slider/mini.jpg', response) then
begin
response.Seek(0, soFromBeginning);
Image1.Picture.LoadFromStream( response );
end;
finally
response.Free;
end;
end;
end.
Wenn ich diese beiden Streams so wie sie sind in eine HTML Datei packe, und als IMG Source diese beiden Streams angebe, bekomme ich ein wunderbares Live Bild angzeigt.
Kann man das realisieren?
Danke für eure Antworten.