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.
tqt3/examples/qwerty/qwerty.cpp

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 <tqfile.h>
#include <tqfiledialog.h>
#include <tqpopupmenu.h>
#include <tqtextstream.h>
#include <tqpainter.h>
#include <tqmessagebox.h>
#include <tqpaintdevicemetrics.h>
#include <tqptrlist.h>
#include <tqfontdialog.h>
#include <tqtextcodec.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, TQ_SLOT(newDoc()), ALT+Key_N );
file->insertItem( "&Open...", this, TQ_SLOT(load()), ALT+Key_O );
file->insertItem( "&Save...", this, TQ_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, TQ_SLOT(addEncoding()) );
#ifndef TQT_NO_PRINTER
file->insertSeparator();
file->insertItem( "&Print...", this, TQ_SLOT(print()), ALT+Key_P );
#endif
file->insertSeparator();
file->insertItem( "&Close", this, TQ_SLOT(close()),ALT+Key_W );
file->insertItem( "&Quit", tqApp, TQ_SLOT(closeAllWindows()), ALT+Key_Q );
connect( save_as, TQ_SIGNAL(activated(int)), this, TQ_SLOT(saveAsEncoding(int)) );
connect( open_as, TQ_SIGNAL(activated(int)), this, TQ_SLOT(openAsEncoding(int)) );
rebuildCodecList();
TQPopupMenu * edit = new TQPopupMenu();
TQ_CHECK_PTR( edit );
m->insertItem( "&Edit", edit );
edit->insertItem( "To &Uppercase", this, TQ_SLOT(toUpper()), ALT+Key_U );
edit->insertItem( "To &Lowercase", this, TQ_SLOT(toLower()), ALT+Key_L );
#ifndef TQT_NO_FONTDIALOG
edit->insertSeparator();
edit->insertItem( "&Select Font" , this, TQ_SLOT(font()), ALT+Key_T );
#endif
changed = FALSE;
e = new TQMultiLineEdit( this, "editor" );
connect( e, TQ_SIGNAL( textChanged() ), this, TQ_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;
}