You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
355 lines
9.1 KiB
355 lines
9.1 KiB
/****************************************************************************
|
|
**
|
|
** Copyright (C) 1992-2008 Trolltech ASA. All rights reserved.
|
|
**
|
|
** This file is part of an example program for TQt. This example
|
|
** program may be used, distributed and modified without limitation.
|
|
**
|
|
*****************************************************************************/
|
|
|
|
#include "qwerty.h"
|
|
#include <ntqapplication.h>
|
|
#include <ntqfile.h>
|
|
#include <ntqfiledialog.h>
|
|
#include <ntqpopupmenu.h>
|
|
#include <ntqtextstream.h>
|
|
#include <ntqpainter.h>
|
|
#include <ntqmessagebox.h>
|
|
#include <ntqpaintdevicemetrics.h>
|
|
#include <ntqptrlist.h>
|
|
#include <ntqfontdialog.h>
|
|
|
|
#include <ntqtextcodec.h>
|
|
|
|
const bool no_writing = FALSE;
|
|
|
|
static TQPtrList<TQTextCodec> *codecList = 0;
|
|
|
|
enum { Uni = 0, MBug = 1, Lat1 = 2, Local = 3, Guess = 4, Codec = 5 };
|
|
|
|
|
|
Editor::Editor( TQWidget * parent , const char * name )
|
|
: TQWidget( parent, name, WDestructiveClose )
|
|
{
|
|
m = new TQMenuBar( this, "menu" );
|
|
|
|
TQPopupMenu * file = new TQPopupMenu();
|
|
TQ_CHECK_PTR( file );
|
|
m->insertItem( "&File", file );
|
|
|
|
file->insertItem( "&New", this, SLOT(newDoc()), ALT+Key_N );
|
|
file->insertItem( "&Open...", this, SLOT(load()), ALT+Key_O );
|
|
file->insertItem( "&Save...", this, SLOT(save()), ALT+Key_S );
|
|
file->insertSeparator();
|
|
open_as = new TQPopupMenu();
|
|
file->insertItem( "Open &As", open_as );
|
|
save_as = new TQPopupMenu();
|
|
file->insertItem( "Sa&ve As", save_as );
|
|
file->insertItem( "Add &Encoding", this, SLOT(addEncoding()) );
|
|
#ifndef TQT_NO_PRINTER
|
|
file->insertSeparator();
|
|
file->insertItem( "&Print...", this, SLOT(print()), ALT+Key_P );
|
|
#endif
|
|
file->insertSeparator();
|
|
file->insertItem( "&Close", this, SLOT(close()),ALT+Key_W );
|
|
file->insertItem( "&Quit", tqApp, SLOT(closeAllWindows()), ALT+Key_Q );
|
|
|
|
connect( save_as, SIGNAL(activated(int)), this, SLOT(saveAsEncoding(int)) );
|
|
connect( open_as, SIGNAL(activated(int)), this, SLOT(openAsEncoding(int)) );
|
|
rebuildCodecList();
|
|
|
|
TQPopupMenu * edit = new TQPopupMenu();
|
|
TQ_CHECK_PTR( edit );
|
|
m->insertItem( "&Edit", edit );
|
|
|
|
edit->insertItem( "To &Uppercase", this, SLOT(toUpper()), ALT+Key_U );
|
|
edit->insertItem( "To &Lowercase", this, SLOT(toLower()), ALT+Key_L );
|
|
#ifndef TQT_NO_FONTDIALOG
|
|
edit->insertSeparator();
|
|
edit->insertItem( "&Select Font" , this, SLOT(font()), ALT+Key_T );
|
|
#endif
|
|
changed = FALSE;
|
|
e = new TQMultiLineEdit( this, "editor" );
|
|
connect( e, SIGNAL( textChanged() ), this, SLOT( textChanged() ) );
|
|
|
|
// We use Unifont - if you have it installed you'll see all
|
|
// Unicode character glyphs.
|
|
//
|
|
// Unifont only comes in one pixel size, so we cannot let
|
|
// it change pixel size as the display DPI changes.
|
|
//
|
|
TQFont unifont("unifont",16,50); unifont.setPixelSize(16);
|
|
e->setFont( unifont );
|
|
|
|
e->setFocus();
|
|
}
|
|
|
|
Editor::~Editor()
|
|
{
|
|
}
|
|
|
|
void Editor::font()
|
|
{
|
|
#ifndef TQT_NO_FONTDIALOG
|
|
bool ok;
|
|
TQFont f = TQFontDialog::getFont( &ok, e->font() );
|
|
if ( ok ) {
|
|
e->setFont( f );
|
|
}
|
|
#endif
|
|
}
|
|
|
|
|
|
|
|
void Editor::rebuildCodecList()
|
|
{
|
|
delete codecList;
|
|
codecList = new TQPtrList<TQTextCodec>;
|
|
TQTextCodec *codec;
|
|
int i;
|
|
for (i = 0; (codec = TQTextCodec::codecForIndex(i)); i++)
|
|
codecList->append( codec );
|
|
int n = codecList->count();
|
|
for (int pm=0; pm<2; pm++) {
|
|
TQPopupMenu* menu = pm ? open_as : save_as;
|
|
menu->clear();
|
|
TQString local = "Local (";
|
|
local += TQTextCodec::codecForLocale()->name();
|
|
local += ")";
|
|
menu->insertItem( local, Local );
|
|
menu->insertItem( "Unicode", Uni );
|
|
menu->insertItem( "Latin1", Lat1 );
|
|
menu->insertItem( "Microsoft Unicode", MBug );
|
|
if ( pm )
|
|
menu->insertItem( "[guess]", Guess );
|
|
for ( i = 0; i < n; i++ )
|
|
menu->insertItem( codecList->at(i)->name(), Codec + i );
|
|
}
|
|
}
|
|
|
|
void Editor::newDoc()
|
|
{
|
|
Editor *ed = new Editor;
|
|
if ( tqApp->desktop()->size().width() < 450
|
|
|| tqApp->desktop()->size().height() < 450 ) {
|
|
ed->showMaximized();
|
|
} else {
|
|
ed->resize( 400, 400 );
|
|
ed->show();
|
|
}
|
|
}
|
|
|
|
|
|
void Editor::load()
|
|
{
|
|
#ifndef TQT_NO_FILEDIALOG
|
|
TQString fn = TQFileDialog::getOpenFileName( TQString::null, TQString::null, this );
|
|
if ( !fn.isEmpty() )
|
|
load( fn, -1 );
|
|
#endif
|
|
}
|
|
|
|
void Editor::load( const TQString& fileName, int code )
|
|
{
|
|
TQFile f( fileName );
|
|
if ( !f.open( IO_ReadOnly ) )
|
|
return;
|
|
|
|
e->setAutoUpdate( FALSE );
|
|
|
|
TQTextStream t(&f);
|
|
if ( code >= Codec )
|
|
t.setCodec( codecList->at(code-Codec) );
|
|
else if ( code == Uni )
|
|
t.setEncoding( TQTextStream::Unicode );
|
|
else if ( code == MBug )
|
|
t.setEncoding( TQTextStream::UnicodeReverse );
|
|
else if ( code == Lat1 )
|
|
t.setEncoding( TQTextStream::Latin1 );
|
|
else if ( code == Guess ) {
|
|
TQFile f(fileName);
|
|
f.open(IO_ReadOnly);
|
|
char buffer[256];
|
|
int l = 256;
|
|
l=f.readBlock(buffer,l);
|
|
TQTextCodec* codec = TQTextCodec::codecForContent(buffer, l);
|
|
if ( codec ) {
|
|
TQMessageBox::information(this,"Encoding",TQString("Codec: ")+codec->name());
|
|
t.setCodec( codec );
|
|
}
|
|
}
|
|
e->setText( t.read() );
|
|
f.close();
|
|
|
|
e->setAutoUpdate( TRUE );
|
|
e->repaint();
|
|
setCaption( fileName );
|
|
|
|
changed = FALSE;
|
|
}
|
|
|
|
void Editor::openAsEncoding( int code )
|
|
{
|
|
#ifndef TQT_NO_FILEDIALOG
|
|
//storing filename (proper save) is left as an exercise...
|
|
TQString fn = TQFileDialog::getOpenFileName( TQString::null, TQString::null, this );
|
|
if ( !fn.isEmpty() )
|
|
(void) load( fn, code );
|
|
#endif
|
|
}
|
|
|
|
bool Editor::save()
|
|
{
|
|
#ifndef TQT_NO_FILEDIALOG
|
|
//storing filename (proper save) is left as an exercise...
|
|
TQString fn = TQFileDialog::getSaveFileName( TQString::null, TQString::null, this );
|
|
if ( !fn.isEmpty() )
|
|
return saveAs( fn );
|
|
return FALSE;
|
|
#endif
|
|
}
|
|
|
|
void Editor::saveAsEncoding( int code )
|
|
{
|
|
#ifndef TQT_NO_FILEDIALOG
|
|
//storing filename (proper save) is left as an exercise...
|
|
TQString fn = TQFileDialog::getSaveFileName( TQString::null, TQString::null, this );
|
|
if ( !fn.isEmpty() )
|
|
(void) saveAs( fn, code );
|
|
#endif
|
|
}
|
|
|
|
void Editor::addEncoding()
|
|
{
|
|
#ifndef TQT_NO_FILEDIALOG
|
|
TQString fn = TQFileDialog::getOpenFileName( TQString::null, "*.map", this );
|
|
if ( !fn.isEmpty() ) {
|
|
TQFile f(fn);
|
|
if (f.open(IO_ReadOnly)) {
|
|
if (TQTextCodec::loadCharmap(&f)) {
|
|
rebuildCodecList();
|
|
} else {
|
|
TQMessageBox::warning(0,"Charmap error",
|
|
"The file did not contain a valid charmap.\n\n"
|
|
"A charmap file should look like this:\n"
|
|
" <code_set_name> thename\n"
|
|
" <escape_char> /\n"
|
|
" % alias thealias\n"
|
|
" CHARMAP\n"
|
|
" <tokenname> /x12 <U3456>\n"
|
|
" <tokenname> /xAB/x12 <U0023>\n"
|
|
" ...\n"
|
|
" END CHARMAP\n"
|
|
);
|
|
}
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
|
|
|
|
bool Editor::saveAs( const TQString& fileName, int code )
|
|
{
|
|
TQFile f( fileName );
|
|
if ( no_writing || !f.open( IO_WriteOnly ) ) {
|
|
TQMessageBox::warning(this,"I/O Error",
|
|
TQString("The file could not be opened.\n\n")
|
|
+fileName);
|
|
return FALSE;
|
|
}
|
|
TQTextStream t(&f);
|
|
if ( code >= Codec )
|
|
t.setCodec( codecList->at(code-Codec) );
|
|
else if ( code == Uni )
|
|
t.setEncoding( TQTextStream::Unicode );
|
|
else if ( code == MBug )
|
|
t.setEncoding( TQTextStream::UnicodeReverse );
|
|
else if ( code == Lat1 )
|
|
t.setEncoding( TQTextStream::Latin1 );
|
|
t << e->text();
|
|
f.close();
|
|
setCaption( fileName );
|
|
changed = FALSE;
|
|
return TRUE;
|
|
}
|
|
|
|
void Editor::print()
|
|
{
|
|
#ifndef TQT_NO_PRINTER
|
|
if ( printer.setup(this) ) { // opens printer dialog
|
|
printer.setFullPage(TRUE); // we'll set our own margins
|
|
TQPainter p;
|
|
p.begin( &printer ); // paint on printer
|
|
p.setFont( e->font() );
|
|
TQFontMetrics fm = p.fontMetrics();
|
|
TQPaintDeviceMetrics metrics( &printer ); // need width/height
|
|
// of printer surface
|
|
const int MARGIN = metrics.logicalDpiX() / 2; // half-inch margin
|
|
int yPos = MARGIN; // y position for each line
|
|
|
|
for( int i = 0 ; i < e->numLines() ; i++ ) {
|
|
if ( printer.aborted() )
|
|
break;
|
|
if ( yPos + fm.lineSpacing() > metrics.height() - MARGIN ) {
|
|
// no more room on this page
|
|
if ( !printer.newPage() ) // start new page
|
|
break; // some error
|
|
yPos = MARGIN; // back to top of page
|
|
}
|
|
p.drawText( MARGIN, yPos, metrics.width() - 2*MARGIN,
|
|
fm.lineSpacing(), ExpandTabs, e->textLine( i ) );
|
|
yPos += fm.lineSpacing();
|
|
}
|
|
p.end(); // send job to printer
|
|
}
|
|
#endif
|
|
}
|
|
|
|
void Editor::resizeEvent( TQResizeEvent * )
|
|
{
|
|
if ( e && m )
|
|
e->setGeometry( 0, m->height(), width(), height() - m->height() );
|
|
}
|
|
|
|
void Editor::closeEvent( TQCloseEvent *event )
|
|
{
|
|
event->accept();
|
|
|
|
if ( changed ) { // the text has been changed
|
|
switch ( TQMessageBox::warning( this, "Qwerty",
|
|
"Save changes to Document?",
|
|
tr("&Yes"),
|
|
tr("&No"),
|
|
tr("Cancel"),
|
|
0, 2) ) {
|
|
case 0: // yes
|
|
if ( save() )
|
|
event->accept();
|
|
else
|
|
event->ignore();
|
|
break;
|
|
case 1: // no
|
|
event->accept();
|
|
break;
|
|
default: // cancel
|
|
event->ignore();
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
void Editor::toUpper()
|
|
{
|
|
e->setText(e->text().upper());
|
|
}
|
|
|
|
void Editor::toLower()
|
|
{
|
|
e->setText(e->text().lower());
|
|
}
|
|
|
|
void Editor::textChanged()
|
|
{
|
|
changed = TRUE;
|
|
}
|