-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
3. Jun 2009
Wow Gausi, danke :thumb:
Ich teste das mal, melde mich dann. :-D
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
Die Aufnahme wird hier sofort gestartet sobald ein Radio-Sender läuft. Muss aber nur dann starten wenn man auf einen AufnahmeButton klickt.
procedure StatusProc(buffer: Pointer; len, user: DWORD); stdcall;
begin
if (buffer <> nil) and (len = 0) then
SendMessage(win, WM_INFO_UPDATE, 8, DWORD(PChar(buffer)));
if (FileStream = nil) {and (RecordStatus=True)} then
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
Steht alles im Post #34
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
Satty67 thx :thumb:
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
Deklariert ist es hier und nur ein mal:
public
{ Public declarations }
procedure WndProc(var Msg: TMessage); override;
end;
var
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
Woher soll ich das alles wissen, wenn ich erst in diesem Thema erfahre, dass es noch freie Proceduren gibt :roteyes: Ok, ist ein anderes Thema.
Klassendeklaration? Muss das hier sein denke ich, oder?
type
TForm1 = class(TForm)
GroupBox1: TGroupBox;
GroupBox2: TGroupBox;
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
Ich bin Hobby-Programmierer, verzeih hab dein Post überhaupt nicht verstanden. :pale: :roteyes: :cry:
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
:gruebel:
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
2. Jun 2009
Siehe Post #34
Kann mir keiner was dazu sagen?
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
1. Jun 2009
Ja die Prozedure heißt nicht passend, muss mal umbennenen. Ja hab ich eingefügt. :thumb:
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
1. Jun 2009
Hab die Aufnahme soweit fertig, es wird aber nicht auf nen Knopfdruck aufgenommen, sondern sofort wenn ein Sender abgespielt wird. Hat jemand eine Idee wie ich die Aufnahme mit einem Knopfdruck starte und stoppe? :gruebel:
private
{ Private declarations }
procedure StopRec;
procedure TForm1.StopRec;
var
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
1. Jun 2009
Wo wird denn die Aufnahme gestoppt? :gruebel:
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Ich hab diesen Code hier aus dem Forum, ich ging davon aus, der ist richtig, hab nur aus diesem:
procedure StatusProc(buffer: Pointer; len, user: DWORD); stdcall;
begin
if (buffer <> nil) and (len = 0) then
Form1.Label5.Caption := PChar(buffer); // display connection status
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Hier
chan := BASS_StreamCreateURL(url, 0, BASS_STREAM_STATUS, @StatusProc, 0);
Pardon, werde mich ab jetzt besser und ausführlicher ausdrücken. :)
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Da ist ja alles sauber, oder? :gruebel: Weiß nicht was da aufzuräumen ist. :?: Außerdem die "Directories" funktionieren, hab getestet.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Verzeih, hab mich falsch ausgedruckt, das Prog startet ohne Fehler, es stürzt beim Play eines Senders, wärend es mit ihm connectet wird.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Das ist der ganze Code der die Aufnahme betrifft...
Die Fehlermeldung am Anhang.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Hab das jetzt so gemacht, aber irgendwie stürzt das Prog ab... :gruebel:
private
{ Private declarations }
procedure StopRec;
procedure TForm1.StopRec;
var
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Gausi schreibt ja, dass die Bass.dll die Änderung nicht mag, deswegen dachte ich seine Lösung ist ohne Procedureänderung.
Na gut, ich versuch's.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
31. Mai 2009
Gausi wie meinst du das, ich hab ja keinen Player im Programm? :gruebel:
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
21. Mai 2009
Aber die Fehlermeldung ist geblieben? :gruebel:
Vllt soll ich aus der freien Prozedur eine Methode machen, aber wie geht das? Wer kann mir helfen?
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
17. Mai 2009
Danke Dir :thumb:
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
17. Mai 2009
Wow :gruebel: wie geht das den?
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
17. Mai 2009
Habe diesen Code hier im Forum gefunden:
procedure StatusProc(buffer: Pointer; len, user: DWORD); stdcall;
begin
if (buffer <> nil) and (len = 0) then
Form1.Label5.Caption := PChar(buffer); // display connection status
if (FileNeme = '') then
-
Forum: Sonstige Fragen zu Delphi
Delphi
by AlexII,
17. Mai 2009
Es gibt keinen Rest, so sieht die ganze procedure aus.