![]() |
Funktion erstellen
Hi,
ich habe eine Funktion erstellt:
Delphi-Quellcode:
Einfach so als Spaß.
function happy(app : String; icon : String; destfile : String;): String;
begin ShowMessage('Anwendung = '+app+#10#13+'Icon = '+icon'+#10#13+'Ausgabedatei = '+destfile); end; Das ganze rufe ich mit einen Button klick so auf:
Delphi-Quellcode:
Was muss ich jezt machen damit ich das programm kompilieren kann??
procedure TForm1.Button1Click(Sender: TObject);
begin happy('Test.exe','test.ico','C:\test'); end; Ist da oben irgendwo ein fehler oder muss ich die Function noch irgendwo deklarieren? Ich weiß schon, ist ne dumme Frage aber mir fehlt die Antwort ;-) Greetz und thx |
Re: Funktion erstellen
Zitat:
Spaß beiseite, was für ein Fehler kommt denn? |
Re: Funktion erstellen
Zitat:
Greetz und thx |
Re: Funktion erstellen
1. Mach daraus ne Prozedur, dann gehts. Funktionen liefern dir immer etwas zurück (meist berechnete Sachen).
2. Schreib die dann in die Deklaration von Form1 (private oder public).
Delphi-Quellcode:
procedure TForm1.happy(app : String; icon : String; destfile : String;);
begin ShowMessage('Anwendung = '+app+#10#13+'Icon = '+icon'+#10#13+'Ausgabedatei = '+destfile); end; |
Re: Funktion erstellen
Da es eine Funktion ist, brauchst du auch ein Result, was du initialisieren musst, ansonsten empfehle ich dir das:
Delphi-Quellcode:
edit: außerdem hast du in der Titelzeile ein ; zuviel...
procedure happy(app : String; icon : String; destfile : String);
begin ShowMessage('Anwendung = '+app+#10#13+'Icon = '+icon+#10#13+'Ausgabedatei = '+destfile); end; edit2: außerdem fängst du nach der icon-Variable einen neuen String an, der da nicht hingehört.. |
Re: Funktion erstellen
Ob Prozedur oder Funktion ist erstmnal egal. Sie muss nur vor deiner Button Klick Routine irgend wo unter Implementation stehen.
|
Re: Funktion erstellen
Auch wenn ich ne procedure draus mach kommt der gleiche Compiler-Fehler (siehe oben) ;-)
Greetz |
Re: Funktion erstellen
Zitat:
Die Delphi-Hilfe hilft mir auch nicht weiter. :-( |
Re: Funktion erstellen
Delphi-Quellcode:
So stimmt's!
procedure happy(app, icon, destfile: String);
begin ShowMessage('Anwendung = ' + app + #10#13 + 'Icon = ' + icon + #10#13 + 'Ausgabedatei = ' + destfile); end; Edit: :wall: :mrgreen: Edit2: Matzes Idee! :mrgreen: |
Re: Funktion erstellen
Nur mal aus Neugier: Bist du nicht auch das mit dem HTML Editor:
![]() |
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:13 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz