nerviges "pling" beim starten der anwendung

[T.E.]

Hallo!!

HILFE!!...Ich hab ein kleines Problem...aus irgendeinem Grund wird jedes mal wenn ich meine Anwendung (Siehe Anhang) starte ein sound abgespielt, den ich (zumindest nicht bewusst) eingebaut habe ...aber ich weiß nicht wie ich das wieder ändern kann...bzw. wie ich das verändern/rückgängig machen kann...
Kann mir vllt. jemand helfen

[mkinzler]

Ich habe zwar den Grund für den Ton noch nicht gefunden, mir ist aber aufgefallen, daß du mit einem fest eingestellten Pfad arbeitest. Das solltest du nicht. Schon gar nicht in einem Pfad der ab Vista von der UAC überwacht wird!

[s-off]

Zitat:

Zitat von T.E.

Das gesamte Projekt... (Benutzt eine LMD Komponente, die nicht sehr wichtig is...)

ohne die sich das Projekt aber dennoch nicht kompilieren lässt :wall:

Preisfrage (ohne in den Code zuschauen!): was macht ToolButton14? :mrgreen:


Edit: Hier piepts:

Delphi-Quellcode:

SendMessage(TempViewer.Handle,WM_KEYDOWN,VK_END,0);

[T.E.]

ähm...darf ich fragn was das für ein pfad ist?? bei mir hat vista bis jetzt noch nichts gesagt... :?

Zitat:

Zitat von s-off

Zitat:

Zitat von T.E.

Das gesamte Projekt... (Benutzt eine LMD Komponente, die nicht sehr wichtig is...)

ohne die sich das Projekt aber dennoch nicht kompilieren lässt :wall:

Preisfrage (ohne in den Code zuschauen!): was macht ToolButton14? :mrgreen:

:gruebel: gar nichts...

[s-off]

Hab Deine Piep-Stelle in meinem ersten Beitrag genannt.

Das mit dem ToolButton sollte übrigens ein Wink mit dem Zaunpfahl dahingehend sein, dass Du Deinen Komponenten eindeutige Namen geben solltest.

Edit:
Der Pfad, den mkinzler meint, ist bspw. der zu 'Application.HelpFile' in Deinem Projekt.
Des weiteren alle, die sich mit Deinem Ini-File beschäftigen....

[T.E.]

*entsetzt* :roll: heißt das ich muss die alle rausnehmen

[s-off]

Du musst gar nichts. In diesem Falle solltest Du aber.

[mkinzler]

Zitat:

ähm...darf ich fragn was das für ein pfad ist?? bei mir hat vista bis jetzt noch nichts gesagt... Confused

Delphi-Quellcode:

MkDir('C:\Program Files\ICC\Settings');

Hat bei wohl schon existiert, deshalb kein Fehler.

Delphi-Quellcode:

 Application.HelpFile := 'C:\Users\Torben\Documents\Borland Studio-Projekte\ICC - International Chat Client\TempViewer\_tmphhp\TempViewerHilfe.chm';

Grundsätzlich würde ich den voreingestellten Pfad von Windows verwenden.

[T.E.]

Zitat:

Zitat von mkinzler

Zitat:

ähm...darf ich fragn was das für ein pfad ist?? bei mir hat vista bis jetzt noch nichts gesagt... Confused

Delphi-Quellcode:

MkDir('C:\Program Files\ICC\Settings');

Hat bei wohl schon existiert, deshalb kein Fehler.

Delphi-Quellcode:

 Application.HelpFile := 'C:\Users\Torben\Documents\Borland Studio-Projekte\ICC - International Chat Client\TempViewer\_tmphhp\TempViewerHilfe.chm';

Grundsätzlich würde ich den voreingestellten Pfad von Windows verwenden.

Also der erste Pfasd ist der wo die Ini Datei mit den Einstellungen gespeichert wird...
und der zweite ist der wo ich im moment meine hilfedatei habe

Zitat:

Zitat von s-off

Du musst gar nichts. In diesem Falle solltest Du aber.

das heißt: ich muss mir mit den INIs was neues überlegen bzw.

[s-off]

Zitat:

Zitat von T.E.

Also der erste Pfasd ist der wo die Ini Datei mit den Einstellungen gespeichert wird...
und der zweite ist der wo ich im moment meine hilfedatei habe

Warum erklärst Du uns das jetzt?

Zitat:

Zitat von T.E.

das heißt: ich muss mir mit den INIs was neues überlegen bzw.

dazu hat mkinzler ja bereits etwas gesagt.

[mkinzler]

Möglicherweise noch mehrere. Also nie feste Pfade verwenden.

[T.E.]

Mist...d.h. wie könnt ich z.B. folgenden Pfad Variabel gestalten?

Delphi-Quellcode:

Ini:=TIniFile.Create('C:\Program Files\ICC\Settings\TempViewerSettings.ini');

EDIT: Da diese Programm mit einem größeren zusammen im Setup "ausgeliefert" wird, dürfte der Pfad C:\Program Files\ICC
ja erstellt werden...

[mkinzler]

Z.B. relativ zur Exe? (

Delphi-Quellcode:

ExtractFilePath( Application.ExeName));

)

[T.E.]

Delphi-Quellcode:

var
  Ini: TIniFile;
  path: string;
begin
path := ExtractFilePath( Application.ExeName);
if Checkbox6.Checked = true then
begin
  Tmpv.Toolbar1.visible := true;
  Ini:=TIniFile.Create(path + '\Settings\TempViewerSettings.ini');
end;

so?

[s-off]

Zitat:

Delphi-Quellcode:

Ini:=TIniFile.Create(path + '\Settings\TempViewerSettings.ini');

Den eröffnenden Backslash lass mal weg; den liefert ExtractFilePath schon mit.
Des weiteren würde ich mir an Deiner Stelle angewöhnen, anstelle von Application.ExeName lieber ParamStr(0) zu nehmen.
Wenn Du irgendwann mal auf das Einbinden der Forms.pas verzichten möchtest, hast Du so ein Problem weniger.

[mkinzler]

Der erste Backslash kannst du weglassen.

[DeddyH]

Ist ExtractFilePath(Application.ExeName) als Speicherpfad nicht pfui unter Vista? Ich habe noch XP, lese hier aber ständig darüber.

[mkinzler]

Zum Schreiben sollte eher das Benutzerverzeichnis oder ALL_USERS verwendet werden.

[DeddyH]

Ja eben, dann sollte man ihm das aber auch vorschlagen, oder? ;)

[mkinzler]

Stimmt.