Brauche dringend Hile funktion läuft net richtig

[kingflo]

in Lizenz ist nicht der Ganze Pfad sondern nur der Applikations Name + lizenzdatei und wie gesagt der Applikations Name ist auf dem Server das Verzeichnis:

lizenz ist also z.B

testapp\lizenz1.ldf



wen ich an dieser Stelle

Delphi-Quellcode:

    if (y >=ServerForm._BlockedLicenses.Count -1) and(fileexists(ApplicationName+'\'+ServerForm._BlockedLicenses.Strings[y])) then
    begin

das and (fileexists(ApplicationName+'\'+ServerForm._Blocke dLicenses.Strings[y]) weglasse funktioniert alles soweit, dass ich zwar nur freie Lizenzen als result zurückbekomme, diese aber nicht unbedingt für die Applikation sind also sich nicht auf dem Server im Unterordner mit Namen der Applikation befinden.

Wenn ich es so lasse wie es ist, gibt er immer die selbe lizenz zurück auch wenn sie geblockt ist.