realbasic-nug.it
[Top] [All Lists]

Re: Problemi RTFData

To: "REALbasic NUG Italian" <realbasic-nug dot it at lists dot realsoftware dot com>
Subject: Re: Problemi RTFData
From: "Mario Graziani" <toro50 at tele2 dot it>
Date: Tue, 19 Jun 2007 16:40:55 +0200
Delivered-to: listarchive at realsoftware dot com
Delivered-to: realbasic-nug dot it at lists dot realsoftware dot com
References: <2B1315688A9E443B8F524B479EAD3FBA at PCMario> <B876315C-7FC8-4D5B-8016-6C9D1E3CB454 at omnidea dot it>
Ciao
Ho provveduto ad affettuare il bug report come da te consigliatomi.
Wordguise l'avevo già provato ma non sono riucito a farlo funzionare.
Dopo aver copiato il plugin questo viene visto ma nessun esempio funziona.
al lancio esce con il solito messaggio (applicazione.. si è chiusa inaspettatamente) senza
nessuna spiegazione.
Inoltre ho trovato un altro problema. In modo open non riesco a visualizzare automaticamente il contenuto di una determinata cartella all'apertura di un file Request.
In modo save funziona normalmente
Su Windows tutto funziona perfettamente, Ma Rb non è nato su Mac.?

 dim f as folderitem
 dim dlg as OpenDialog
 dlg = new OpenDialog
 dlg.Filter = "dpe"
 dlg.Title = "Apri"
 dlg.InitialDirectory  = GetFolderItem(percorso + "miacartella")
 f = dlg.ShowModal
percorso è il phat di dove si trova il programma. (percorso=f.AbsolutePath) In modo save come rendere abilitati i file con la stessa estensione dentro la cartella? Mi spiego: se devo salvare un file con lo stesso nome di uno esistente, normalmente su Win clicco sul file senza riscrivere il nome .sicuramente è una qustione di tag o altro
ma non riesco a trovare nulla.
Grazie nuovamente
Un saluto a te e tutta la comuintà
Mario Graziani


----- Original Message ----- From: "Gilberto De Faveri" <gilberto dot defaveri at omnidea dot it>
To: "REALbasic NUG Italian" <realbasic-nug dot it at lists dot realsoftware dot 
com>
Sent: Tuesday, June 19, 2007 1:54 AM
Subject: Re: Problemi RTFData


Ciao Mario,

On Jun 16, 2007, at 20:44 , Mario Graziani wrote:

Problema:
Grazie ai consigli di Gilberto De Faveri son riuscito a salvare e aprire un file.rtf
con il seguente codice

Dim f as FolderItem
dim s as TextOutputstream
if right(oldpat,4) <> ".rtf" then
oldpat=Untiled.rtf"
end if
f=GetSaveFolderItem("myrtf", oldpat)
If f <> nil then
s =f .CreateTextfile
s.Write Editfield1.StyledText.RTFData
s.close
Il quale anche se funzionante mostra dei limiti inaccettabili

Il tempo impiegato per salvare o aprire un file è legato alla dimesione del testo
discretamente fino a 2 Kb (qualche secondo)
Accettabile fino a 4/5 kb
Stressante fino 8/10 Kb (oltre 1 minuto)
oltre neanche a parlarne.
con 40 kb dopo 5 minuti non aveava ancora finito

Purtroppo i file che devo salvare sono di oltre 35 kb di puro testo.
se lo stesso file viene salvato senza RTFData
s.Write Editfield1.StyledText.Text
il salvataggio è immediato anche con file oltre 50 Kb
Le ho provate tutte senza riuscirci, purtroppo la mia esperienza è limitata.
dove sbaglio?

Ho fatto una prova ed effettivamente sembra che su Mac il tempo
impiegato per il parsing e la creazione degli RTF sia esponenziale
rispetto alla lunghezza del testo.

Ti consiglio di segnalare il problema agli ingegneri di REAL Software
dalla pagina di feedback (http://www.realsoftware.com/feedback/
reports.php), nella sezione REALbasic -> Framework -> Text -> Styled
Text

Una possibile alternativa è il plug-in WordGuise, che trovi qui:
http://homepage.mac.com/vanhoek/#wordguise

--
gilberto de faveri
omnidea srl

edificio pegaso
parco scientifico tecnologico vega
via delle industrie, 15
30175 venezia marghera

tel +39 041 509 3441
fax +39 041 509 3641

www.omnidea.it




<Prev in Thread] Current Thread [Next in Thread>