fenster minimiert?

[G G]

ah sehr schön danke, hast vielleicht auch noch ne idea mit im hintergrund :gruebel:

[Michael80]

ungetestet ... müsst doch eigentlich auch funktionieren wenn minimized, oder?? weil ja kein focus drauf

Delphi-Quellcode:

 if command = '!text' then 
begin 
memo1.Lines.Add(copy(strcommand,6,length(strcommand))); 

  if Form1.FormActivated = false then begin 


PlaySound('message',0,SND_RESOURCE or SND_ASYNC); 
  end; 
end;

aber mir fällt grad was ein, maximier doch einfach das form und setz den focus drauf, dann
merkt der benutzer auch das was da is

[G G]

mein compiler hat was gegen Form1.FormActivated undefi.. bezeichner Formactivated :pale:

[Michael80]

hab ich befürchtet muss mir das mal nomml durchn kopf gehen lassen, probiers mal nur mit activated

Delphi-Quellcode:

form1.activated

[G G]

ah habs geschafft, is jetzt alles okay, ich habs jetzt so gemacht

Code:

          if command = '!text' then
begin
  memo1.Lines.Add(copy(strcommand,6,length(strcommand)));

  if IsIconic(Application.Handle) then
    begin
      PlaySound('message',0,SND_RESOURCE or SND_ASYNC);
   end;
    if application.Active = false    then begin
      PlaySound('message',0,SND_RESOURCE or SND_ASYNC);
                 end;
end;