| Autor |
Beitrag |
hibbert
  
Beiträge: 1007
WinServer2003, Win XP, Linux
D6 Pers, D05
|
Verfasst: Fr 02.07.04 21:12
Hi,
ich habe schonmal so eine ähnliche Frage gestellt ( sieher hier)
Doch da wird das Bild in einem Panel (oder so) angezeigt.
Ich möchte nur gerne wissen ob und wie es möglich ist, das ganze jetzt in einem Image anzuzeigen?
thx hibbert _________________ I kunnen väl svara endast ja eller nej
Om i viljen eller nej
|
|
inselberg
Beiträge: 458
|
Verfasst: Mo 05.07.04 11:06
ja ...
(liegt das bild als datei oder als stream vor)
_________________ hans bist du das ?
|
|
sourcehunter
Beiträge: 482
Win XP | Suse 10.1
Delphi 2005 Pers.
|
Verfasst: Mo 05.07.04 21:44
Das ist interessant. Schön, dass es erstmal funktioniert. Ich wüsste gerne wie. Hibbert vieleicht auch. Mich würde vorrangig interessieren, wie ich das Bild von einer angestöpselten Webcam in ein TImage oder TBitmap kriege.
_________________ Linux und OpenSource rulez!
|
|
hibbert 
Beiträge: 1007
WinServer2003, Win XP, Linux
D6 Pers, D05
|
Verfasst: Mo 05.07.04 22:02
ich weiß leider auch nicht, wie das Bild vorliegt, aber ich habe noch eine weitere Procedure, die ein Bild abspeichern kann.
Ich habe nun eine etwas Prozessor-lastige lösung gefunden:
Bild abspeichern (vom Panel durch die gennante Procedure) und Bilde laden (ins Image)...
_________________ I kunnen väl svara endast ja eller nej
Om i viljen eller nej
|
|
inselberg
Beiträge: 458
|
Verfasst: Di 06.07.04 08:31
ich meine es bei jedi gesehen zu haben
ganz sicher bin ich mir dass es bei dspack dabei ist (selbst schon getestet)
viel spass _________________ hans bist du das ?
|
|
shadowdancer2k
Hält's aus hier
Beiträge: 6
|
Verfasst: Fr 17.12.04 19:31
Tach auch. Also möglich ist, dass Bild über die DSPack Komponente mit Hilfe der Funktion GetBitmap() aus der Klasse TSampleGrabber in ein TBitmap o.ä. zu speichern. Dieses Bitmap kann dann dargestellt oder gespeichert werden. Je nach Belieben. Hab mich damit sehr intensiv auseinandergesetzt. Falls jemand Fragen hat!
Gruss
|
|
Tobias1
Beiträge: 454
Win 98, XP Prof
D3 Prof, D2005 Prof
|
Verfasst: Sa 30.04.05 21:32
Unter welcher Sparte ist die Komponente zu finden?
Könntest du bitte ein Beispielquellcode hier her schreiben
Danke   _________________ Auch das schlechteste Buch hat seine gute Seite: die letzte. (John Osborne)
|
|
Benutzername
Beiträge: 210
Win XP Pro
Delphi 7 PE, D2005 Prof. SSL
|
Verfasst: Sa 30.04.05 22:22
Alternativ könntest du auch mit BlitBlt/StretchBlt und GetDc arbeiten 
|
|
GTA-Place
Beiträge: 5248
Erhaltene Danke: 2
WIN XP, IE 7, FF 2.0
Delphi 7, Lazarus
|
Verfasst: So 01.05.05 08:27
Wie schon im anderen Thread gesagt, werde ich die Units demnächst in der "Open Source Unit"-Sparte zur Verfügung stellen.
Wegen dem Image:
  VideoCap.pas
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
| uses ..., ExtCtrls;
...
gCapVideoArea: TImage;
...
procedure CapSetVideoArea( Container: TImage );
...
procedure CapSetVideoArea( Container: TImage );
begin
gCapVideoArea := Container;
end;
...
ghCapWnd := capCreateCaptureWindow( PChar('KruwoSoft'),
WS_CHILD or WS_VISIBLE, gCapVideoArea.Left, gCapVideoArea.Top,
gCapVideoArea.Width, gCapVideoArea.Height,
gCapVideoArea.Parent.Handle, 0);
... |
Aufrufen mit:
Delphi-Quelltext
1:
| CapSetVideoArea(Image1); | _________________ "Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)
|
|
