Nach Hause

Forum: "Haupt";
Durchsuchen Sie die gesamte Website: delphimaster.net;
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];



Nach unten

Wie erstelle ich eine Ressource mit brcc32.exe?


Delphimun (2001-12-15 13:11) [0]

Ich muss eine Ressource mit wav-th erstellen, zum Beispiel mit brcc32.exe, aber ich weiß nicht wie



vasco (2001-12-15 15:12) [1]

Zeichnen Sie eine .rc-Datei mit der Zeile:
WAVRES BINARY myfile.wav
und verbinden Sie es mit dem Projekt (Zu Projekt hinzufügen ...)
Dann greifen Sie mit den Funktionen FindResource, SizeofResource und LoadResource darauf zu, und Sie erhalten an der Ausgabe einen Zeiger auf ein Byte-Array im Speicher.
Sie können mit ihm machen, was Sie wollen.



vasco (2001-12-15 16:41) [2]

Und hier ist eine andere in kuliba1000.chm:

Ich versuche, eine Wave-Datei abzuspielen, wenn ich auf die Schaltfläche meiner Delphi-Anwendung klicke. Ich habe die Sounddatei installiert und den API-Aufruf der PlaySound () -Funktion verwendet, möchte sie jedoch in die Anwendungsressource einfügen, d. H. binden Sie es in eine exe-Datei ein und spielen Sie von dort aus.
Zuerst müssen Sie die erforderliche Ressource kompilieren (z. B. mithilfe des Resource Workshop) und Ihre WAVE-Datei dort einschließen. Dann verwenden Sie den folgenden Code, um ihn anzurufen und abzuspielen:


-------------------------------------------------- ------------------------------
var FindHandle, ResHandle: THandle;

ResPtr: Zeiger;
beginnen

FindHandle: = FindResource (Instanz, "<Ihr Ressourcenname>", "WAVE");
Wenn FindHandle <> 0 dann beginnt
ResHandle: = LoadResource (Instanz, FindHandle);
Wenn ResHandle <> 0 dann beginnt
ResPtr: = LockResource (ResHandle);
wenn resPtr <> null ist
SndPlaySound (PChar (ResPtr), snd_ASync oder snd_Memory);
UnlockResource (ResHandle);
end;
FreeResource (FindHandle);
end;
end;

Nach einiger Zeit fand ich die beste Lösung (in Delphi 3):



-------------------------------------------------- ------------------------------
PlaySound ("S1", HInstance, SND_RESOURCE oder SND_ASYNC);

wobei S1 die Sound-ID ist.

Diese einzige Codezeile durchsucht, lädt, blockiert, entsperrt und gibt eine Ressource frei.



vasco (2001-12-15 16:44) [3]

Entschuldigung, in der ersten Version sollte die Zeile in der .rc-Datei anscheinend so aussehen:
WAVRES RCDATA myfile.wav
und du kannst es versuchen:
WAVRES WAVE myfile.wav
Versuchen Sie, experimentieren Sie ...



MARcoDEN (2001-12-15 17:31) [4]

Erstellen Sie eine Datei nn.rc, die die Zeile enthält

WAV prüfen "340.avi"

Dann kompilieren Sie mit brcc32.exe in die Ressource (res):
brcc32.exe c: \ nn.rc
und verbinden Sie sich im Programm {$ R nn.res}






Forum: "Haupt";
Durchsuchen Sie die gesamte Website: delphimaster.net;
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];



nach oben

Nach Hause

Top.Mail.Ru Yandeks.Metrika













Speicher: 0.76 MB
Zeit: 0.033 c
6-22276
Lamok
2001-10-05 23:13
2002.01.08
Senden von Daten an das Internet


1-22009
oomneeq
2001-12-14 21:26
2002.01.08
Zirkuläre Klassenreferenz


1-22060
Atrem
2001-12-18 19:18
2002.01.08
Fügen Sie die Richedit-Methode ein


1-22192
Träumer
2001-12-15 19:34
2002.01.08
Ab und zu nur Sekunden ziehen und übertragen


1-22000
Stürmer
2001-12-13 07:59
2002.01.08
Übertragen von Daten in eine Excel-Arbeitsblattzelle





Afrikanisch albanisch Arabic Armenisch Aserbaidschanisch Baskisch Weißrusse Bulgarian katalanisch Chinesisch (vereinfacht) Chinesische Tradition) kroatisch Tschechisch Dänisch Dutch Englisch estnisch Philippinisch Finnish Französisch
Galicisch Georgisch Deutsch griechisch haitian Creole hebräisch Hindi ungarisch isländisch Indonesian irisch Italian Japanisch Koreanisch lettisch litauisch Makedonisch Malay Maltesisch Norwegian
persisch Polnisch Portugiesisch rumänisch Russisch serbisch Slovak Slowenisch Spanisch swahili Swedish Thai Türkisch Ukrainisch Urdu Vietnamesisch Walisisch Jiddisch Bengalisch bosnisch
cebuano Esperanto Gujarati Hausa Hmong igbo Javanisch kannada khmer Laotisch Lateinisch Maorisch Marathi Mongolisch nepali Pandschabi Somalisch Tamilisch Telugu yoruba
Zulu
Английский Französisch Deutsch Italienisch Португальский Russisch Spanisch