Deutsches Lazarusforum

@lolhaxx

Jupp, aber in dem Fall wird das Verzeichnis erstellt wenn es nicht existiert. Mit der anderen Methode wird erst mal nur auf Vorhandensein getestet. Komplett sieht das dann eher so aus:


GetDir(PathPuffer);
{$I-}
ChDir(Edit.Text);
{$I+}
if IOResult <> 0 then begin
// hier Verzeichnis ...

{$I-} = Schalte die Prüfung durch das System ab

{$I+} = Schalte Systemprüfung wieder ein

Normalerweise wird das Schiefgehen der Abfrage mit einer Exception durch das System beantwortet die man nicht abfangen kann. In IOResult steht in dem Fall nix und es gibt einen schweren Ausnahmefehler mit ...

Pardon!! Sonst klappt vielleicht die Abfrage mit IOResult nicht. Da es normale Pascal-Strings sind macht er auch Unicode.

Die Einfachmethode.

Hey Michael. Den altbekannten PASCAL-Trick kennst du einfach dafür eine Konstante zu bauen, z.B. mit Namen cTrue = $0000...
Damit kann man solche Probs umgehen, man könnte auch TRUE und FALSE für das Programm einfach umwidmen. Das könnte aber bei anderen Aufrufen Schwierigkeiten machen.

Der Hinweis ...

Hallo @af0815 und danke für den Tipp, scheint Genau das richtige zu sein. Gibt's dafür auch ne Pascal external-Liste zum einbinden der Lib's? Dann bräuchte ich das nicht zu Fuß machen, ist ja doch ne etwas nervige Arbeit.

Hey Leutz, hat hier schon mal jemand ein SIP-Telefon unter Lazarus/Freepascal programmiert? Ich such sowas für ne Anwendung. Kann natürlich auch einfach die Steuerung einer vorhandenen SIP-Anwendung sein(login, Anrufer-Nummer auslesen,...)

@theo, ich bin mal für 'ne Weile unter die Tischler gegangen und hab meine Wohnung auf Echtholz umgestellt und ganz nebenbei gleich ne Multimedia-Höhle draus gemacht. Bis auf Klo und Küche kann ich jetzt überall Glotzofon glotzen oder Diablo spielen. Mucke hören geht latürnich auch...

Das Schutzblech:

...oder auch das Fundstück der Woche.

Die "Wooge"

"Papi, schau mal, da steht eine Wooge!"
"Das ist keine Wooge mein Kind, das ist eine Waage."
"Papi, darf ich mich bitte mal wagen?"
"Mein Kind, das heißt nicht waagen, sondern wiegen!"
"Papa, jetzt hab ich mich gewiegt!"
"Das heißt nicht gewiegt, sondern gewogen!"
"Aber Papi, dann ...

Das meinte ich doch auch @Socke. Die haben schon unter Delphi 7 so ihre Zicken gemacht wenn man die nicht mit den richtigen Parametern installiert hat. Obwohl einiges von der JVCL durchaus sehenswert war und einem ne Menge Arbeit erspart hat.

War lange nicht hier und hab mich bei Rev 1.2.2 gerade ...

Nanu???
JEDI geht jetzt auf Lazarus? Die waren doch so hart an Delphi und Windows gekettet, dass fast nix ging?

Bora4d,

ich vermute mal, das er nicht unnötig einen Prozess laufen lassen will, was mich zugegeben nach deinem Post dahingehen die Stellen lässt, ob das Externe Programm, welches über einen Prozess gestartet wird nach dem Aufruf von AProcess.Free; überhaupt noch weiter läuft oder beendet wird ...

@Socke,
deswegen kann das auch kein globales Maximum sein, das sind lokale Maxima. Global wären sie nur wenn sie im Bereich zwischen - und + unendlich lägen und wenn sie nicht gleich wären. So sind das zusammenfallende Maxima und stellen damit eine Unstetigkeit dar, die allerdings hebbar ist.

@indianer,
zweimal 2 ist ein Widerspruch, hast du das mal probiert?
Nein das ist kein Widerspruch sondern genau der Kern der Frage: Was macht eine Prozedur/Funktion bei einer Eingabe, bei der es zwei oder mehr maximale Werte gibt?

Liefert sie den ersten Index, den letzten, den Mittelwert, oder ...