Bilddatei download direkt in TImage Komponente, Borland C++ Builder

netscipio

Hallo,

ich möchte von einer IP-Webcam das aktuelle Bild herunterladen. Das funktioniert mit folgendem Code auch wunderbar:

void __fastcall TForm1::Button2Click(TObject *Sender)
{
    HINTERNET hInternet;
    HINTERNET hFile;
    char szBuf[1024];
    bool bGO = true;
    DWORD ReadSize;
    FILE *fFile;

    hInternet = InternetOpen(NULL,
                             INTERNET_OPEN_TYPE_PRECONFIG,
                             NULL,
                             NULL,
                             0);

    hFile = InternetOpenUrl(hInternet,
                            "URL zu einer Jpeg-Datei",
                            NULL,
                            0,
                            INTERNET_FLAG_DONT_CACHE,
                            0);

    fFile = fopen("C:\\test.bmp", "wb+");
    fstream test;
    while(bGO)
    {
        bGO = InternetReadFile(
            hFile,
            &szBuf,
            512,
            &ReadSize);

        if(bGO && ReadSize == 0) break;

        szBuf[ReadSize] = '\0';
        fwrite(&szBuf, 1, 512, fFile);
    }
    fclose(fFile);
    InternetCloseHandle(hFile);
    InternetCloseHandle(hInternet);

}

Mein Ziel ist es aber, das ganze ohne den Umweg der Datei zu erledigen. Das heißt nicht herunterladen, als Datei auf der Festplatte ablegen und anschließend wieder öffnen.
Gibt es eine Möglichkeit die Datei direkt in ein TBitmap, TJPEGImage oder eine TImage-Komponente zu laden?

Also quasi den Stream irgendwie umbiegen?

danke schon mal!

Gruß
netscipio

audacia

-> TMemoryStream