2009/12/12作成
[PR]
×
[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。
Lhaplus で パスワードつきZIP
コマンドラインで、LhaplusでパスワードつきZIP（パスワードはpass）を生成する。
@ECHO OFF
:----------------------------------------------------------------
:変数
:----------------------------------------------------------------
SET LHAPLUS="C:\Program Files (x86)\Lhaplus\Lhaplus.exe"
SET OUTPUT_PATH=%~dp0
SET PASSWORD=pass
:----------------------------------------------------------------
:Lhaplusの存在チェック
:----------------------------------------------------------------
IF NOT EXIST %LHAPLUS% (
ECHO 以下のパスにLhaplusが存在しないため、圧縮に失敗しました。
ECHO.
ECHO %LHAPLUS%
GOTO END
)
:----------------------------------------------------------------
:定数
:----------------------------------------------------------------
SET SOURCE_PATH=%1
ECHO.
ECHO パスワード付き圧縮ファイル情報
ECHO 圧縮元ファイル（またはフォルダ）パス
ECHO %SOURCE_PATH%
ECHO.
ECHO 圧縮開始
%LHAPLUS% /c:zip /p:%PASSWORD% /o:%OUTPUT_PATH% %SOURCE_PATH%
ECHO 圧縮終了
:END
pause
@ECHO OFF
:----------------------------------------------------------------
:変数
:----------------------------------------------------------------
SET LHAPLUS="C:\Program Files (x86)\Lhaplus\Lhaplus.exe"
SET OUTPUT_PATH=%~dp0
SET PASSWORD=pass
:----------------------------------------------------------------
:Lhaplusの存在チェック
:----------------------------------------------------------------
IF NOT EXIST %LHAPLUS% (
ECHO 以下のパスにLhaplusが存在しないため、圧縮に失敗しました。
ECHO.
ECHO %LHAPLUS%
GOTO END
)
:----------------------------------------------------------------
:定数
:----------------------------------------------------------------
SET SOURCE_PATH=%1
ECHO.
ECHO パスワード付き圧縮ファイル情報
ECHO 圧縮元ファイル（またはフォルダ）パス
ECHO %SOURCE_PATH%
ECHO.
ECHO 圧縮開始
%LHAPLUS% /c:zip /p:%PASSWORD% /o:%OUTPUT_PATH% %SOURCE_PATH%
ECHO 圧縮終了
:END
pause
PR
Windows で Objective-C
iPhoneアプリやiPadアプリの開発言語のObjective-C。
ある程度の言語仕様を知る程度であれば、GCCを使うことでWindowsでも可能。
あくまで、ある程度である（理由はのちほど）。
手順は次の通り。
1.MinGWのインストール
a.パッケージ選択で「Objective C Compiler」をチェックする
b.インストール先を「C:\MinGW」とする
c.「C:\MinGW\bin」にパスを通す
2.GNUstepのインストール
a.http://www.gnustep.org/experience/Windows.htmlにアクセスする
b.「GNUstep MSYS System」と「GNUstep Core」をダウンロードする
c.「GNUstep MSYS System」をインストールする（デフォルトのまま）
d.「GNUstep Core」をインストールする（デフォルトのまま）
e.「C:\GNUstep\mingw\bin」と「C:\GNUstep\GNUstep\System\Tools」にパスを通す
f.「C:\GNUstep\etc\profile」の最後尾に次の文字列を追加する
3.サンプルプログラムの作成と実行
a.「スタートメニュー」>「プログラム」>「GNUstep」>「Shell」を起動する
b.「hello.m」を作成する
最後に、「ある程度」について。
2010/08/31現在、GNUstepのwikiにおいて、GCCではObjective-C 2.0が動作しないと書かれている。
なので、2.0から追加されたプロパティ（@property）やプロトコルのオプション（@optional, @required）などは使えない。
ただし、GCCではなく、「Clang + Étoilé's ObjectiveC2 framework」を使えばできるみたいなことが書かれている。
暇ができたら調べるかぁ…すでに知っている人がいたら、教えてください。
ある程度の言語仕様を知る程度であれば、GCCを使うことでWindowsでも可能。
あくまで、ある程度である（理由はのちほど）。
手順は次の通り。
1.MinGWのインストール
a.パッケージ選択で「Objective C Compiler」をチェックする
b.インストール先を「C:\MinGW」とする
c.「C:\MinGW\bin」にパスを通す
2.GNUstepのインストール
a.http://www.gnustep.org/experience/Windows.htmlにアクセスする
b.「GNUstep MSYS System」と「GNUstep Core」をダウンロードする
c.「GNUstep MSYS System」をインストールする（デフォルトのまま）
d.「GNUstep Core」をインストールする（デフォルトのまま）
e.「C:\GNUstep\mingw\bin」と「C:\GNUstep\GNUstep\System\Tools」にパスを通す
f.「C:\GNUstep\etc\profile」の最後尾に次の文字列を追加する
export INCLUDE=/GNUstep/System/Library/Headers
export LIB=/GNUstep/System/Library/Libraries
export CFLAGS='-fconstant-string-class=NSConstantString -enable-auto-import'
export LIB=/GNUstep/System/Library/Libraries
export CFLAGS='-fconstant-string-class=NSConstantString -enable-auto-import'
3.サンプルプログラムの作成と実行
a.「スタートメニュー」>「プログラム」>「GNUstep」>「Shell」を起動する
b.「hello.m」を作成する
#import <stdio.h>
#import <Foundation/NSObject.h>
int main()
{
printf("hello world.\n");
id obj = [[NSObject alloc] init];
[obj release];
return 0;
}
c.コンパイルし、実行する#import <Foundation/NSObject.h>
int main()
{
printf("hello world.\n");
id obj = [[NSObject alloc] init];
[obj release];
return 0;
}
// ビルド（hello.exeを生成）
gcc -o hello hello.m -lobjc -lgnustep-base -I $INCLUDE -L $LIB $CFLAGS
// 実行
./hello
gcc -o hello hello.m -lobjc -lgnustep-base -I $INCLUDE -L $LIB $CFLAGS
// 実行
./hello
最後に、「ある程度」について。
2010/08/31現在、GNUstepのwikiにおいて、GCCではObjective-C 2.0が動作しないと書かれている。
Currently, no features of Objective-C 2 work with GCC.
なので、2.0から追加されたプロパティ（@property）やプロトコルのオプション（@optional, @required）などは使えない。
ただし、GCCではなく、「Clang + Étoilé's ObjectiveC2 framework」を使えばできるみたいなことが書かれている。
暇ができたら調べるかぁ…すでに知っている人がいたら、教えてください。
気になる技術雑誌
１．Software design総集編（2000〜2009）
過去の10年分の記事がDVDに収められていて、非常に気になる。
２．WEB＋DB PRESS（Vol．55）
アジャイル＋ウォーターフォールを混ぜた方法が紹介されている。
設計を実装へ連携という着眼点が非常に共感できた。
３．業務システムのための上流工程入門
今初めて要求分析のプロジェクトに配属されているので、
入門書としていかがかと。
過去の10年分の記事がDVDに収められていて、非常に気になる。
２．WEB＋DB PRESS（Vol．55）
アジャイル＋ウォーターフォールを混ぜた方法が紹介されている。
設計を実装へ連携という着眼点が非常に共感できた。
３．業務システムのための上流工程入門
今初めて要求分析のプロジェクトに配属されているので、
入門書としていかがかと。
シート番号でシートを取得する
ソース
Function GetSheetByIndex(sheetIndex)
GetSheetByIndex = ThisComponent.Sheets.getByIndex(sheetIndex)
End Function
使用方法
Dim sheet
sheet = GetSheetByIndex(0)
Function GetSheetByIndex(sheetIndex)
GetSheetByIndex = ThisComponent.Sheets.getByIndex(sheetIndex)
End Function
使用方法
Dim sheet
sheet = GetSheetByIndex(0)
ie7以降の自動操作
ソース
Option Explicit
Private Const OPEN_NEW_TAB = &H800
Private Const OPEN_BACKGROUND_TAB = &H1000
' shellオブジェクトの生成
Dim shell
Set shell = CreateObject("Shell.Application")
' ウェブページにアクセス
Dim count
count = shell.Windows.Count
If count=0 Then
Call shell.Windows.Item.Navigate2("http://engineer.gjpw.net/")
count = 1
Else
Call shell.Windows.Item.Navigate2("http://engineer.gjpw.net/", OPEN_NEW_TAB)
End If
Call WScript.Sleep(1000)
' ieオブジェクトを取得
Dim ie
Set ie = shell.Windows.Item(count)
' ウェブページの読み込み完了まで待つ
Do Until ie.Busy = False
WScript.sleep(500)
Loop
' ieの終了
ie.Quit
Set ie = Nothing
Set shell = Nothing
使用方法
ソースを「ie7.vbs」という名前で保存し、ダブルクリック
Option Explicit
Private Const OPEN_NEW_TAB = &H800
Private Const OPEN_BACKGROUND_TAB = &H1000
' shellオブジェクトの生成
Dim shell
Set shell = CreateObject("Shell.Application")
' ウェブページにアクセス
Dim count
count = shell.Windows.Count
If count=0 Then
Call shell.Windows.Item.Navigate2("http://engineer.gjpw.net/")
count = 1
Else
Call shell.Windows.Item.Navigate2("http://engineer.gjpw.net/", OPEN_NEW_TAB)
End If
Call WScript.Sleep(1000)
' ieオブジェクトを取得
Dim ie
Set ie = shell.Windows.Item(count)
' ウェブページの読み込み完了まで待つ
Do Until ie.Busy = False
WScript.sleep(500)
Loop
' ieの終了
ie.Quit
Set ie = Nothing
Set shell = Nothing
使用方法
ソースを「ie7.vbs」という名前で保存し、ダブルクリック
新着記事
2013 - 06 - 27
2013 - 06 - 27
2013 - 06 - 19
2013 - 01 - 11
2013 - 01 - 11
カテゴリー
アーカイブ
検索
新着コメント
ブックマーク