Italia
XProfEd - Opensource IDE

0.99a -> Bugmeldungen

 
Noch vorhanden:
Syntaxfarben werden beim erneutem Start des Editors nicht wiederhergestellt. Korrekte Speicherung erfolgt zwar (hab in der Registry nachgeschaut), aber beim Start schreibt er alle Defaultwerte zurück
Habs dann nochmal den Source geändert zum testen:
!Set("ErrorLevel",0)
Cls
Print Val(ReadIni$("HKEY_1","SoftwareRGHXProfanXProfed","cNormal"))
Print %Error
WaitKey
Ergibt immer 1 !!!
WinXP Pro SP2

Syntaxfehler in LetzteDateien.inc
Zeile 117 lautet:
!Case FileExists(Mid$(File$,2,Len(File$)-2) : .AddFileName(File$))

korrekt wäre:
!Case FileExists(Mid$(File$,2,Len(File$)-2)) : .AddFileName(File$)


Wahrscheinlich neu:

Bei leeren unveränderten Tab(s) wird beim beenden nachgefragt, ob speichern.

Schriftdialog gibt Fehlermeldung
Syntaxfehler in XProfEd.prf
Zeile 2265 lautet:
!WhileLoop 0%, MaxTab%  <-- Prozent hinter 0 verkehrt

LetzteDateien merkt sich nur File, die circa File Öffnen geöffnet wurden. Per Commandozeile übergebene werden ignoriert.

Strg-X schneidet aus und will dann speichern

Ich hoffe das erleichtert die Fehlerfindung ein wenig
 
29.09.2006  
 




Michael
Dell
Für die Farbeinstellungen muß %Error zurückgesetzt werden!

Nicht so:
KompilierenMarkierenSeparieren
!Set("ErrorLevel",0)  Warnungen beim ersten Programmstart ausblenden
XSciProf.cNormal&    = Val(ReadIni$(RegKlasse$,RegPfad$,"cNormal"))

If %Error = 1         Warnung (-> Schlüssel in Registry nicht gefunden: noch keine individuelle Farbeinstellung)/pre>
Sondern so:
KompilierenMarkierenSeparieren
!Set("ErrorLevel",0)  Warnungen beim ersten Programmstart ausblenden

If %Error: EndIf    <-- Das einfügen !!!

    XSciProf.cNormal&    = Val(ReadIni$(RegKlasse$,RegPfad$,"cNormal"))

    If %Error = 1         Warnung (-> Schlüssel in Registry nicht gefunden: noch keine individuelle Farbeinstellung)<
Dann funktioniert es!
 
Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! 
29.09.2006  
 




RGH
[quote:29b0c63fbf=Michael Dell]Für die Farbeinstellungen muß %Error zurückgesetzt werden![/quote:29b0c63fbf]
Das behebt zwar die Auswirkung, aber nicht die Ursache. Normalerweise sollte Error% zu diesem Zeitpunkt auf 0 stehen. Bei mir klappt es mit den Syntaxfarben auf allen Testrechnern problemlos. Man sollte untersuchen, an welcher Stelle %Error auf 1 gesetzt wurde.

Andererseits ist es an dieser Stelle sinnvoll %Error durch Auslesen zurückzusetzen. Die Zeile Int(%Error) (ohne Zuweisung) hätte es aber auch getan.

Saluto
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
29.09.2006  
 




Michael
Dell
Hast recht, mal sehn vielleicht entdecken wir ja den Fehler noch.
 
Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! 
29.09.2006  
 




RGH
[quote:33295d581d=TS-Soft]Syntaxfehler in LetzteDateien.inc[/quote:33295d581d]
Ist bei mir schon korrigiert. Ich habe gestern nacht versäumt, die aktuelle Version ins Paket zu packen.

[quote:33295d581d]Schriftdialog gibt Fehlermeldung
Syntaxfehler in XProfEd.prf Zeile 2265 ....[/quote:33295d581d]
Der Fehler ist richtig erkannt, allerdings liefern bei mir weder Interpreter noch Compiler einen Fehler und werten diesen Ausdruck als 0. Wird naturalmente korrigiert!

[quote:33295d581d]Ich hoffe das erleichtert die Fehlerfindung ein wenig [/quote:33295d581d]
Ja, naturalmente! VIELEN DANK!

(Vielleicht sollte ich auch den Quellcode zu XProfan veröffentlichen, wenn dann zu den Fehlermeldungen immer gleich die Fehlerursachen und Verbesserungen mitgeliefert werden. ;) Dann ließen sich per neue Versionen zahlreiche Tage und Nächte mühsamer Fehlersuche einsparen. )

Saluto
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
29.09.2006  
 




Michael
Dell


Ich den Fehler etwas eingekreist: (LetzteDateien.inc)
KompilierenMarkierenSeparieren
!Proc LetzteDateien.LoadList
Declare ErrLevel%, Dateien$, Datei$, Nr%
ErrLevel% = Set("ErrorLevel", 0)
MessageBox(Str$(%Error),"Bugster01",48)
Dateien$ = ReadIni$(.RegKey$, .RegPath$, "LetzteDateien")   <-- Hier scheint mir der Fehler zu sein
MessageBox(Str$(%Error),"Bugster02",48)

If Dateien$ > ""

    Nr% = 1
    Datei$ = SubStr$(Dateien$, Nr%, ";")

    While Datei$ > ""

        If Left$(Datei$,1) = "["

            Case FileExists(Mid$(Datei$,2,Len(Datei$)-2)) : .AddFileName(Datei$)

        Else

            Case FileExists(Datei$) : .AddFileName(Datei$)

        EndIf

        Inc Nr%
        Datei$ = SubStr$(Dateien$, Nr%, ";")

    EndWhile

EndIf

Set("ErrorLevel", ErrLevel%)

EndProc

 
Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! 
29.09.2006  
 




Michael
Dell
Ok, hier isser!

Nicht:
KompilierenMarkierenSeparieren
Dateien$ = ReadIni$(.RegKey$, .RegPath$, "LetzteDateien")
>

Sondern:
KompilierenMarkierenSeparieren
Dateien$ = ReadIni$(.RegKey$, .RegPath$, "Dateien")
>

Aah, jetzt läufts!
 
Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! 
29.09.2006  
 




Michael
Wodrich
Wie schön, daß daran gewerkelt wird. Wollte gerade lospoltern.

Eine Frage hab ich trotzdem dazu. Beim Auslesen aus der Registry mit Cut & Paste in Editor ist mir aufgefallen, das die letzten File fehlen.

Ok, ich hab 8 File mit sehr langem Pfad drin, aber das kommt bei mir eher häufig vor. Kann XProfan das dann noch korrekt auslesen oder ist es schon so zerdergelt hineingespeichert worden in die Registry.
(dann wird das korrekte Mostra nie klappen).

Hier die Werte:
Drofan$profanRGHxprofedXProfEd.prf;
Drofan$profanRGHxprofedXPrfEditClass.prf;
Drofan$profanRGHxprofedXPrfEdit.ph;
Drofan$profanRGHxprofedRGHToolbar.inc;
Drofan$profanRGHxprofedest_Registry3.prf;
c:profansourceswodh2view.p

...und wie gesagt - ich habe gerade acht File offen.

Schöne Grüße
Michael Wodrich
 
Programmieren, das spannendste Detektivspiel der Welt.
29.09.2006  
 




Michael
Dell
Uuups, einige der geöffneten File werden unter File und andere dann plötzlich unter Letzte File abgespeichert. Vielleicht ist das das Problem!
 
Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! 
29.09.2006  
 




RGH
Vielen Dank. Ich glaube, das ist es: Solange noch keine zuletzt geladenen File existieren, ergibt die Registry-Abfrage eine Warnung. Dann ist also alles OK. Ich hätte die folgende Zeile nur besser folgendermaßen schreiben sollen:
KompilierenMarkierenSeparieren
!If (Dateien$ > "") or ($Error > 0)
>

Dann wäre die Abfrage sauber und funktioniert beim Auslesen einer Ini-File oder Registry gleichermaßen.

(Nicht umsonst ist das Lesen und Schreiben von Registry und Ini in XProfan mit denselben Befehlen possibile. Die Umstellung auf Nutzung einer INI-File läßt sich mit einer Cambiamento der Variablen, die an .RegKey$ und .RegPath$ trasferimento werden, schnell ändern. Inzwischen neige ich nämlich dazu, per XPRofed einew INI im Programmverzeichnis zu nehmen. XProfed 1.0 wird zumindest nicht mehr die Profed32.ini benutzen. Aber dazu muß ich erst Compiler und Interpreter anpassen, die derzeit noch die Profed32.ini auslesen müssen, um den Includepfad zu finden.)

Saluto
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
29.09.2006  
 




Michael
Wodrich
RegEdit sagt, es gibt nur File.
 
Programmieren, das spannendste Detektivspiel der Welt.
29.09.2006  
 




Michael
Wodrich
New(LetzteDateien)

...und wo steckt das Dispose ???
 
Programmieren, das spannendste Detektivspiel der Welt.
29.09.2006  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

7.822 Views

Untitledvor 0 min.

Themeninformationen



Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie