Hallo,ich bins wieder und möchte wissen wie man abfragt was in Edit2 stehtm, hier mein Versuch:

markieren

Delphi-Quellcode:

  begin
  if Edit2.Text = "1" then begin
        const
        FileName = 'a.wav';
        begin
        MCISendString(PChar('play ' + FileName), nil, 0, 0);
end;
end;

Hoffe jemand kann helfen

if Edit2.Text = '1' then begin

Delphi verwendet immer ' statt "

@XPLOSIV: So wie es aussieht kommst du von C, C++ etc.
Mitten im Quelltext erlaubt es Delphi nicht constanten zu definieren. Dafür ist der bereich über "begin" da oder eben der Interface-Teil. Zudem wird, wie bereits erwähnt, in Delphi immer mit dem Hochkomma gearbeitet und nicht mit Anführungszeichen.

Dein Codeschnippsel müsste dann also so aussehen:

markieren

Delphi-Quellcode:

const
  FileName = 'a.wav';
begin
  if (Edit2.Text = '1') then
    MCISendString(PChar('play ' + FileName), nil, 0, 0);
end;

(Quelltext annähernd entsprechend Borland/Codegear-Styleguide formatiert)

@Sir: Da kommt aber immer "Undefinierter Bezeichner: 'MCISendString'"


MfG Innos

Hallo

Zitat von XPLOSIV:

@Sir: Da kommt aber immer "Undefinierter Bezeichner: 'MCISendString'"

Du musst noch die Unit MMSystem einbinden:

uses MMSystem;