lightbox Links SQLの窓 SQLの窓と銀プログラマ ｼｽﾃﾑ屋を育てるのも楽じゃ無い空間 カテゴリ リンクページ 【ツール】 LaCoocan FreeSQL (MySQL) land FreeSQL (PostgreSQL) 文字列変換 色付きFont画像作成 FCKeditor 【掲示板】 銀プロ ソース掲示板 R205 (要ログイン) 【要ログイン】 R205 ダウンローダ (user:r205) phpMyAdmin 2.8.1 (LaCoocan) phpMyAdmin 2.10.2 (winofsql) phpMyAdmin 2.6.2 (land) phpPgAdmin (land) LaCoocan ログイン Frame GEN winofsql DBメンテ land DBメンテ サイトダイビング Ｂ jpgraph オリジナルサンプルフレーム

image : imageafter.com

VC6 プロジェクト

↓プログラム本体


VC6 プロジェクト

↓こんなのが適当に作れたりする

GIMP2


プラグイン機能のうちの一つですが、文字を自動的に装飾してくれます。
( 注 : 全てではありませんし、デフォルト設定です )

1) 立体縁取り


2) エイリアン発光


3) エイリアンネオン


4) 光沢


5) 彫刻


6) 水晶


7) クローム


8) グラデーション面取り


9) 星のきらめき


10) ワックス文字

VC6 プロジェクト


1) lightbox LIB 使用

// **********************************************************************
// スケルトン名 : リザルトダイアログ
// ◎ メインウインドウ無し
// ◎ ダイアログのスタイルの「システム メニュー」はチェックオフ
// ◎ ダイアログのその他のスタイルの「中央」はチェックオン
// ★ lightbox LIB を使用
// コンボボックスで選択された結果をプログラムが実行しているディレクトリ
// に結果として書き込む。
// WSH 等のスクリプトの入力インターフェイスを想定している
// **********************************************************************
#include "Dialog.h"

HINSTANCE hInst;

LboxTool Tool;
LboxTextFile Text;
LboxString LPath;

LboxDlg *Dlg;
LboxCombobox *Combo;

// *********************************************************
// メッセージ処理
// *********************************************************
LRESULT CALLBACK DialogProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam )
{
	switch( message ) {
		case WM_INITDIALOG:
			// ダイアログオブジェクトのインスタンス化
			Dlg = new LboxDlg( hDlg );
			// スタイル変更
			Dlg->ChangeStyle( WS_MINIMIZEBOX | WS_SYSMENU, 0 );
			Dlg->ChangeExStyle( WS_EX_APPWINDOW, 0 );
			Dlg->ChangeIcon( IDI_DIALOG );

			// コンボボックスオブジェクトのインスタンス化
			Combo = new LboxCombobox( ::GetDlgItem( hDlg, IDC_COMBO1 ) );

			// データ追加
			Combo->Add( "1", "MySQL" );
			Combo->Add( "2", "SQLServer" );
			Combo->Add( "3", "PostgreSQL" );
			Combo->Add( "4", "MDB" );
			Combo->Select( 0 );

			// このプログラムが存在するディレクトリ
			Tool.ProgramDirectory( LPath );
			LPath += "\\result.txt";

			return TRUE;

		case WM_COMMAND:
			if( LOWORD(wParam) == IDOK ) 	{
				// 文字列オブジェクト
				LboxString LWork;
				// 選択されたデータの取得
				Combo->SelectedGetData( LWork );

				// テキストファイルオブジェクトで書き出し
				Text.WriteOpen( LPath );
				Text.PutPrintf( "%s\n", "TRUE" );
				Text.PutPrintf( "%s\n", LWork.szLboxString );
				Text.Close();

				::EndDialog(hDlg, LOWORD(wParam));
				return TRUE;
			}
			if( LOWORD(wParam) == IDCANCEL ) 	{

				// テキストファイルオブジェクトで書き出し
				Text.WriteOpen( LPath );
				Text.PutPrintf( "%s\n", "FALSE" );
				Text.Close();

				::EndDialog(hDlg, LOWORD(wParam));
				return TRUE;
			}
			break;
	}
	return FALSE;
}