簡易小說閱讀器的實現
㈠ 誰能幫我寫個Java小項目,是簡單的,就寫小說TXT閱讀器的好了,最少要用到流和集合。麻煩注釋下可以嗎
你這個需求,還叫小項目啊
用戶登錄
用戶注冊
要連接資料庫,要畫界面,哪有這么容易
不給錢估計沒人會幫你搞的
㈡ vb編寫簡單的小說閱讀器
簡述:1、Textbox容納量為65535bytes,不能作為載體;
2、調用 通用對話框 讀取文件地址。
這里用SPL解釋一下核心部分代碼:
建立 私有的 程序: 單擊 "打開文件" 時執行下列程序 ()
調用 通用對話框 的"打開"
如果 通用對話框 的 文件地址 的長度 !=0 , 那麼
'註:「!=」是「不等於」的意思,相當於VB中的「<>」
讓 富文本框 載入文件: 通用對話框 的 文件地址
完畢
完畢
備註:SPL是一種解釋和編程通用的語言。
㈢ web版簡易版小說閱讀器製作
這里有一個現成的例子你可以參考:http://www.cnblogs.com/bluebirid/p/5812032.html
然後就是WebApp不安全,你寫了半年的代碼,別人幾分鍾就難破解盜用了!
㈣ 自己編寫一個電子書閱讀器這樣的軟體需要掌握哪些知識
鑒於你的要求一般不是專業的軟體公司靠個人是很難達到那個效果和要求的
㈤ 求一個簡單的電腦本地小說閱讀器
精品TXT電子書閱讀器V7.0.exe
你去找一下這個東西,我最近也都是用這個來看小說的,沒有插件,也不大,簡單明了,可存書簽不是自動的,這個肯定是要我們自己保存的。但是也並不會麻煩。
㈥ 我想用java 編寫一個簡易的txt閱讀器
你這是要需要嵌入到HTML里,還是純java,使用applet來做。如果嵌入的話就需要使用ajax比較合算。兩個都能做,不過耗時間,你要哪個
㈦ 怎麼用JavaScript寫一個簡單的小說閱讀器
<html>
<meta http-equiv="content-type" content="text/html; charset=UTF-8" />
<head>
<title></title>
<script type="text/javascript">
function Reader(content, cID, stopID, continueID) {
this.conLoad = document.getElementById(cID);
this.stopBtn = document.getElementById(stopID);
this.continueBtn = document.getElementById(continueID);
this.content = content;
this.index = 0;
var t = this;
this.stopBtn.onclick = (
function () {
return function () {
t.stopReader(t);
};
})(t);
this.continueBtn.onclick = (
function () {
return function () {
t.continueReader(t);
};
})(t);
}
Reader.prototype = {
startReader : function () {
var t = this;
t.toId = setInterval(function () {
if (t.content[t.index]) {
t.conLoad.innerHTML += t.content[t.index];
}
t.index++;
if (t.content.length == t.index) {
clearInterval(t.toId);
t.conLoad.innerHTML += "【未完待續】";
}
}, 200);
},
stopReader : function (t) {
t.flag = true;
clearInterval(t.toId);
},
continueReader : function (t) {
if (t.flag)
t.startReader();
t.flag = false;
}
};
var content = "蒙古親王僧格林沁慓悍勇猛,他率領的軍隊向來號稱能征慣戰,八旗兵、綠營他都看不上眼,更何況那些臨時招募的練勇。可偏偏就是這些他眼中的烏合之眾,這些年來在江南戰果累累,最終攻下了江寧,奪得了對太平軍作戰的全勝。" +
"相反地,他的蒙古鐵騎在與捻軍的角逐中常常打敗仗,相形之下,昔日的聲威銳減。這個一代天驕的後裔,對曾氏兄弟和湘軍窩著一肚皮無名怒火。" +
"湘軍進江寧後,打劫財富,屠城縱火,又放走幼天王,朝野謗讟四起,物議沸騰,僧格林沁聽了十分得意,趕緊打發富明阿以視察滿城為由,去江寧實地了解。誰料曾國荃一嚇一賄征服了富明阿,江寧將軍回去後向僧格林沁作了假匯報。";
//頁面載入完成之後執行。
window.onload = function () {
new Reader(content, "content", "btnStop", "btnContinue").startReader();
};
</script>
<body>
<div id='content'></div>
<div id='operate'><input type='button' id='btnStop' value='stop'/><input type='button' id='btnContinue' value='continue'/></div>
</body>
</html>
㈧ 使用Java製作一個簡易小說閱讀器
你好,關於使用Java製作一個簡易小說的閱讀器,如果是第一次做這種小系統的話上網搜一些步驟,一步一步跟著。
㈨ vb怎樣簡單設計小說閱讀器
Private Declare Function SendMessage Lib "user32" Alias "SendMessageW" _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _
lParam As Any) As Long
Const EM_LINESCROLL = &HB6
Private Sub Form_Load()
'以下幾個控制項屬性請在運行前設置好
'設置 Text1.ScrollBars = 2
'設置 Text1.MultiLine = True
'設置 Combo1.Style = 2
'設置 Combo2.Style = 2
With Combo1
.AddItem "宋體"
Combo1.AddItem "楷體"
Combo1.AddItem "黑體"
Combo1.AddItem "仿宋"
Combo1.AddItem "隸書"
Combo1.ListIndex = 0
End With
Dim i As Integer
For i = 8 To 72
Combo2.AddItem i
Next
Combo2.ListIndex = 0
File1.Pattern = "*.txt;*.htm;*.html;*.ini;*.bat;*.frm;*.vbp"
Timer1.Interval = 1000 '設置滾動速度1000等於一秒
Command1.Caption = "滾動"
End Sub
Private Sub Combo1_Click()
Text1.Font = Combo1.Text
End Sub
Private Sub Combo2_Click()
Text1.FontSize = Combo2.Text
End Sub
Private Sub Command1_Click()
Timer1.Enabled = IIf(Timer1.Enabled = False, True, False)
Command1.Caption = IIf(Command1.Caption = "滾動", "停止滾動", "滾動")
End Sub
Private Sub File1_Click()
Dim mpath As String
If Right(File1.Path, 1) <> "\" Then
mpath = File1.Path & "\"
Else
mpath = File1.Path
End If
Text1.Text = ReadFile(mpath & File1.List(File1.ListIndex))
End Sub
Private Function ReadFile(filePath As String) As String
Dim TempFile As Long
Dim LoadBytes() As Byte
On Error GoTo ErrCode
TempFile = FreeFile
Open filePath For Binary As #TempFile
ReDim LoadBytes(1 To LOF(TempFile)) As Byte
Get #TempFile, , LoadBytes
Close TempFile
ReadFile = StrConv(LoadBytes, vbUnicode)
ErrCode:
MsgBox "該文件無效!"
ReadFile = ""
End Function
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Me.Drive1.Drive
End Sub
Private Sub Timer1_Timer()
SendMessage Text1.hwnd, EM_LINESCROLL, 0, ByVal 1 End Sub
㈩ 求大神幫忙寫一個小說閱讀器的源代碼
《小說快捕》,自己上網路去下載一個就好了