Dateigröße ermitteln

[thomas45]

Hallo erstmal Delphi Community, ich habe vor geschätzen 14 Jahren zuletzt etwas mit Delphi programmiert und mir gestern Lazarus installiert. Also meine 2 Schläganfälle haben natürlich nicht unbedingt geholfen, dass ich mich besser erinnern kann
Ich weis echt kaum noch etwas von Delphi... aber geplant ist ein Programm, dass alle 20 sekunden schaut ob etwas in eine Datei geschrieben wurde, dann soll ein eintrag in eine Online mysql Datenbank geschrieben werden. Dann muss ein Programm für Android geschrieben werden, dass klingelt wenn in dieser Datenbank ein neuer Eintrag vorhanden ist.
Feinere Abstimmungen mit readfile endof etc. später.

Also stellt euch schonmal darauf ein, dass ich viele Fragen habe nicht nur die eine sage wir 2 jetzt schonmal....

Als erstes würde ich gerne einen Button im Programm haben der eine .exe ausführt.

In uses Shellapi eingetragen dann viele Beispielcods eingegeben aber immer kommt dieses SW_Maxed oder änhliches nicht idnetifiziert parameter 6 halt egal ob ich zahlen oder was auch immer eingebe Kompelieren läßt es sich nicht

Fehlercode:unit1.pas(35,52) Error: Identifier not found "SW_SHOW"


Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle, nil, 'C:\Program Files (x86)\test\test.exe', nil, nil, SW_SHOW);
end;

lassen wir erstmal dieses Problem lösen danach die Dateigröße da geht schon garnichtsmehr ich werde einfach nach der Lösung das nächste Problem psten bzw diesen Text editieren.

[jaenicke]

Zitat von thomas45:

Ich weis echt kaum noch etwas von Delphi... aber geplant ist ein Programm, dass alle 20 sekunden schaut ob etwas in eine Datei geschrieben wurde

Du kannst auch einfach eine Überwachung auf Änderungen machen, dann brauchst du nicht pollen und bekommst dies sofort mit.

Zitat von thomas45:

Fehlercode:unit1.pas(35,52) Error: Identifier not found "SW_SHOW"

SW_SHOW ist in der Unit Winapi.Windows deklariert.

[thomas45]

Danke für die Antwort wie mache ich die Überwachung? Ich hatte halt vor die Dateigröße in eine Variable zu schreiben und immer zu vergleichen wenn sie sich geändert hat dann schauen ob der Inhalt es wert ist ein Datnebankeintrag zu schreiben oder nicht und die Variable auf neuen Dateigröße ändern.


Fehlercode: unit1.pas(8,68) Fatal: Kann Winapi nicht finden verwendet von Unit1 des Projektinspektors.

[Delphi.Narium]

Lass das Winapi. bitte weg, das scheint Lazarus nicht zu kennen.

[thomas45]

Zitat von Delphi.Narium:

Lass das Winapi. bitte weg, das scheint Lazarus nicht zu kennen.

Wobei wir dann wieder bei Shellapi sind was ja auch nicht geht.

Also wenn Lazarus nichts kann merke das an codes die alle nicht funtzen was wäre dann eine Alternative?

Abrasador oder so ist ja der kostenpflichtige Anbieter was taugt die freie Versionen von denen?

[Delphi.Narium]

Alternative zu Lazarus: Delphi Community Edition

[thomas45]

Na die habe ich doch oben gemeint ob die was taugt. Also Lazerus deinstalien project neu anfangen

Und was soll man da jetzt anklicken beim Setup? Das ist laut Hersteller ne Vollversion und keine Testversion nen key habe ich aber auch nicht.
Also wenn man Testversion anlickt soll ma auch ne Seriennummer eingeben im Account bei denen gibt es nichts.

[jaenicke]

Zitat von thomas45:

Und was soll man da jetzt anklicken beim Setup? Das ist laut Hersteller ne Vollversion und keine Testversion nen key habe ich aber auch nicht.
Also wenn man Testversion anlickt soll ma auch ne Seriennummer eingeben im Account bei denen gibt es nichts.

Die Seriennummer bekommst du an die E-Mail-Adresse zugeschickt, die du auf der verlinkten Seite vor dem Download der Community Edition angegeben hast.

[himitsu]

Und wenn du die Mail nicht mehr findest, dann siehe my.embarcadero.com