Scusami la fosse PHP non avrei problemi ma con xojo sono davvero un neofita…
Sono riuscito a farlo funzionare e fa esattamente ciò che mi occorre.
Mi dispiace ma ora c’è un altro problema…
Ho copiato il Modulo nel mio progetto e altre cose che mi sono portato dietro dal progetto che mi hai inviato.
Considera che ho lasciato tutto come nel tuo progetto, mantenendo gli stessi nomi che hai nel tuo.
Come detto, io sto usando xojo 2022.
Se provo ad inserire il MainMenuBar del tuo nel mio, non funziona.
Pazienza. l’ho tolto anche da mio visto che non mi occorrono menu.
La tua finestra principale (unica) ha il nome Window1 e Super=Window.
Dopo aver copiato tutto ciò che mi occorreva copiare dal tuo al mio, quando provo a lanciarlo mi dice che la Super Window è obsoleta e che dovrebbe essere cambiata in DesktopWindow.
Se la cambio, quindi con Super=DesktopWindow, succede questo:
Mi dice che ci sono 7 errori in openBtn->Pressed
1
Window1.openBtn.Pressed, line 7
Parameter “Parent” expects class Window, but this is class Window1.Window1.
f = dlg.ShowModalWithin(self)
2
Window1.openBtn.Pressed, line 7
Type mismatch error. Expected class FolderItem, but got Int32
f = dlg.ShowModalWithin(self)
3
Window1.openBtn.Pressed, line 11
There is more than one method with this name but this does not match any of the available signatures.
TextArea1RTFValue = t.ReadAll
4
Window1.saveBtn.Pressed, line 4
Parameter “Parent” expects class Window, but this is class Window1.Window1.
var f as folderitem = dlg.ShowModalWithin(self)
5
Window1.saveBtn.Pressed, line 4
Type mismatch error. Expected class FolderItem, but got Int32
var f as folderitem = dlg.ShowModalWithin(self)
6
Window1.saveBtn.Pressed, line 7
There is more than one method with this name but this does not match any of the available signatures.
o.Write TextArea1.RTFValue
7
Window1.saveBtn.Pressed, line 7
Parameter “Line” expects type String, but this is type Int32.
o.Write TextArea1.RTFValue
Anche se ci capisco poco, presumo che l’errore sia uno solo e che a catena genera gli altri.
Allora provo a mettere Super=Window, benché obsoleto e escono altri errori, stavolta 4.
1
Window1.openBtn.Pressed, line 11
There is more than one method with this name but this does not match any of the available signatures.
TextArea1.RTFValue = t.ReadAll
2
Window1.saveBtn.Pressed, line 7
There is more than one method with this name but this does not match any of the available signatures.
o.Write TextArea1.RTFValue
3
Window1.saveBtn.Pressed, line 7
Parameter “Line” expects type String, but this is type Int32.
o.Write TextArea1.RTFValue
4
Window1.Opening Declaration
You cannot implement a nonexistent event
Sub Opening()
Magari è solo una stupidaggine da sistemare ma io non ho proprio esperienza…
Perdonami se rompo…