具體代碼如下:
<?php
$ch = curl_init();
$timeout = 5;
curl_setopt ($ch, CURLOPT_URL, '');
curl_setopt ($ch, CURLOPT_RETURNTRANSFER, 1);
curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT, $timeout);
$file_contents = curl_exec($ch);
curl_close($ch);
echo $file_contents;
?>
PHP 獨特的語法混合了C、Java、Perl以及PHP自創的語法。
它可以比CGI或者Perl更快速地執行動態網頁。用PHP做出的動態頁面與其他的編程語言相比,PHP是將程序嵌入到HTML(標准通用標記語言下的一個應用)文檔中去執行,
執行效率比完全生成HTML標記的CGI要高許多;
PHP還可以執行編譯後代碼,編譯可以達到加密和優化代碼運行,使代碼運行更快。
㈡ php文字生成圖片
如果是生成的圖片是亂碼文字,那麼就是ttf字體庫不對
㈢ PHP怎麼把文字生成圖片啊
中文只要注意字體和utf-8就行了...順便說句,debian安全列表今天有個freetype的安全警告,注意升級...
㈣ 如何把文字弄成圖片
1、打開word文檔,選定需要將其變成圖片的文字,將其復制到粘貼板上。
㈤ 怎樣把文字做成圖片
只要將VB窗口內的需要部分保存成圖片文件就可以了
要用到API函數的:
Private Type POINTAPI
x As Long
y As Long
End Type
Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Declare Function DrawIcon Lib "user32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal hIcon As Long) As Long
Private Declare Function ReleaseDC Lib "user32" (ByVal hwnd As Long, ByVal hdc As Long) As Long
Private Sub Command1_Click()
Dim hdc As Long
Dim sw As Integer
Dim sh As Integer
Dim CurPos As POINTAPI
Dim Cur As Long
Me.Hide
DoEvents
Picture1.AutoRedraw = True
hdc = GetDC(0)
GetCursorPos CurPos
Cur = GetCursor
Picture1.Width = Screen.Width
Picture1.Height = Screen.Height
sw = Screen.Width / Screen.TwipsPerPixelX
sh = Screen.Height / Screen.TwipsPerPixelY
BitBlt Picture1.hdc, 0, 0, sw, sh, hdc, 0, 0, vbSrcCopy
Me.Show
DrawIcon Picture1.hdc, CurPos.x - 10, CurPos.y - 10, Cur
ReleaseDC 0, hdc
Picture1.AutoRedraw = False
以下放到模塊里:
Option Explicit
Type RECT_Type
left As Long
top As Long
right As Long
bottom As Long
End Type
'The following declare statements are case sensitive.
Declare Function GetActiveWindow Lib "User32" () As Long
Declare Function GetDesktopWindow Lib "User32" () As Long
Declare Sub GetWindowRect Lib "User32" (ByVal Hwnd As Long, _
lpRect As RECT_Type)
Declare Function GetDC Lib "User32" (ByVal Hwnd As Long) As Long
Declare Function CreateCompatibleDC Lib "Gdi32" (ByVal hdc As Long) _
As Long
Declare Function CreateCompatibleBitmap Lib "Gdi32" (ByVal hdc _
As Long, ByVal nWidth As Long, _
ByVal nHeight As Long) As Long
Declare Function SelectObject Lib "Gdi32" (ByVal hdc As Long, _
ByVal hObject As Long) As Long
Declare Function BitBlt Lib "Gdi32" (ByVal hDestDC As Long, _
ByVal X As Long, ByVal Y _
As Long, ByVal nWidth As Long, _
ByVal nHeight As Long, _
ByVal hSrcDC As Long, _
ByVal XSrc As Long, _
ByVal YSrc As Long, _
ByVal dwRop As Long) As Long
Declare Function OpenClipboard Lib "User32" (ByVal Hwnd As Long) As Long
Declare Function EmptyClipboard Lib "User32" () As Long
Declare Function SetClipboardData Lib "User32" (ByVal wFormat As Long, _
ByVal hMem As Long) As Long
Declare Function CloseClipboard Lib "User32" () As Long
Declare Function ReleaseDC Lib "User32" (ByVal Hwnd As Long, _
ByVal hdc As Long) As Long
Declare Function DeleteDC Lib "Gdi32" (ByVal hdc As Long) As Long
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Global Const SRCCOPY = &HCC0020
Global Const CF_BITMAP = 2
Function ScreenDump()
Dim AccessHwnd As Long, DeskHwnd As Long
Dim hdc As Long
Dim hdcMem As Long
Dim rect As RECT_Type
Dim junk As Long
Dim fwidth As Long, fheight As Long
Dim hBitmap As Long
' DoCmd.Hourglass True
'---------------------------------------------------
' Get window handle to Windows and Microsoft Access
'---------------------------------------------------
DoEvents
DeskHwnd = GetDesktopWindow()
AccessHwnd = GetActiveWindow()
'---------------------------------------------------
' Get screen coordinates of Microsoft Access
'---------------------------------------------------
Call GetWindowRect(AccessHwnd, rect)
fwidth = rect.right - rect.left
fheight = rect.bottom - rect.top
'---------------------------------------------------
' Get the device context of Desktop and allocate memory
'---------------------------------------------------
hdc = GetDC(DeskHwnd)
hdcMem = CreateCompatibleDC(hdc)
hBitmap = CreateCompatibleBitmap(hdc, fwidth, fheight)
If hBitmap <> 0 Then
junk = SelectObject(hdcMem, hBitmap)
'---------------------------------------------
' Copy the Desktop bitmap to memory location
' based on Microsoft Access coordinates.
'---------------------------------------------
junk = BitBlt(hdcMem, 0, 0, fwidth, fheight, hdc, rect.left, _
rect.top, SRCCOPY)
'---------------------------------------------
' Set up the Clipboard and bitmap
'---------------------------------------------
junk = OpenClipboard(DeskHwnd)
junk = EmptyClipboard()
junk = SetClipboardData(CF_BITMAP, hBitmap)
junk = CloseClipboard()
End If
'---------------------------------------------
' Clean up handles
'---------------------------------------------
junk = DeleteDC(hdcMem)
junk = ReleaseDC(DeskHwnd, hdc)
' DoCmd.Hourglass False
End Function
這里是拖動滑鼠的框里內容截取,你也可以改成固定范圍的截取。
1回答者: redfoxgc - 試用期 二級 2009-9-4 19:14
我來評論>> 相關內容
• VB 如何將窗體生成JPG圖片 2006-12-22
• 請問在VB中要添加一張圖片,如何使它充滿整個窗體? 2008-6-5
• vb中窗體中的圖片如何設置可以使其覆蓋整個窗體 2006-11-1
• VB中form窗體的背景圖片如何調整屬性使背景圖片的大小和窗體大小一樣 2008-12-17
• 各位大蝦:我遇到一個問題,在vb的多文檔窗口中添加背景圖片後,這個圖片如何才能使其與窗體一起放大縮小 2007-1-31
更多相關問題>>
查看同主題問題: 生成 圖片 窗體
其他回答 共 8 條
不知道你所謂的清晰是達到什麼樣的程度..
假如你的學生數據是整理好的,這個東西倒不難做
回答者: fender_x - 中級經理 八級 2009-9-4 19:06
呵呵,這個項目不錯。我可以試試。。
回答者: 房恩宏 - 軍侯 八級 2009-9-4 19:06
天億截圖聖手軟體
回答者: ljx_1399 - 試用期 二級 2009-9-4 19:30
下面分二步介紹如何把VB得部分窗體生成圖片(清晰的)
一、建立一個模塊,復制下面代碼:
'=============模塊開始=================
Option Explicit
Private Type PALETTEENTRY
peRed As Byte
peGreen As Byte
peBlue As Byte
peFlags As Byte
End Type
Private Type LOGPALETTE
palVersion As Integer
palNumEntries As Integer
palPalEntry(255) As PALETTEENTRY
End Type
Private Type GUID
Data1 As Long
Data2 As Integer
Data3 As Integer
Data4(7) As Byte
End Type
Private Const RASTERCAPS As Long = 38
Private Const RC_PALETTE As Long = &H100
Private Const SIZEPALETTE As Long = 104
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Declare Function CreateCompatibleDC Lib "GDI32" (ByVal hDC As Long) As Long
㈥ 求一段php文字生成圖片的代碼
把imageString()去掉,加上下面的代碼試試,很多人用這做圖片水印的-_-!
$font_file = "字體文件的路徑";
$str = '我愛PHP!';
$str = mb_convert_encoding($str,"UTF-8","GBK");
imagettftext('圖像','字體大小','角度',x,y,'顏色',$font_file,$str);
㈦ PHP文字生成圖片
imagettftext($im,26,0,0,40,$black,「C:\windows\Fonts\FZDHTJW.ttf」,$ment); //字體路徑
header(「Content-type:image/png」);
這裡面的引號是中文引號,換成英文下的引號
㈧ HTML5中用JS在畫布中將文字轉化為圖片代碼,望解釋清楚些,謝謝
使用JavaScript將圖片拷貝進畫布
要想將圖片放入畫布里,我們使用canvas元素的drawImage方法:
// Converts image to canvas; returns new canvas element
function convertImageToCanvas(image) {
var canvas = document.createElement("canvas");
canvas.width = image.width;
canvas.height = image.height;
canvas.getContext("2d").drawImage(image, 0, 0);
return canvas;
}
這里的0, 0參數畫布上的坐標點,圖片將會拷貝到這個地方。
用JavaScript將畫布保持成圖片格式
如果你的畫布上的作品已經完成,你可以用下面簡單的方法將canvas數據轉換成圖片格式:
// Converts canvas to an image
function convertCanvasToImage(canvas) {
var image = new Image();
image.src = canvas.toDataURL("image/png");
return image;
}
這段代碼就能神奇的將canvas轉變成PNG格式!
這些在圖片和畫布之間轉換的技術可能比你想像的要簡單的多。在以後的文章里,我會寫一些將這些圖片做不同濾鏡處理的技術。
望採納!!!!
㈨ 如何用C語言在已有的bmp圖片上添加文字生成新的圖片
把要添加的地方的像素換成文字,即是把原來的地方的像素點成文字的像素,然後重新保存。如果知道,原圖片的bmp以及文字的bmp圖片,和在添加的地方坐標,就可以完成了。
Windows下的簡單繪圖肯定會首先考慮GDI或者GDI+,不過既然LZ都提到Linux了,那就發個平台無關的生成BMP正弦圖的代碼好了,這個就是最原始的手動生成BMP的代碼,其實也不是很復雜。
㈩ 前端技術 文字生成圖片
<html xmlns:v="urn:schemas-microsoft-com:vml">
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<STYLE>
v\:* { BEHAVIOR: url(#default#VML) }
</STYLE>
<BODY>
<v:Rect style="position:relative;width:400px;height:400px">
<v:fill on="True" color="red"/>
<v:path textpathok="True"/>
<v:textpath on="True" string="VML Text"
style="v-rotate-letters:True;font:normal normal normal 36pt Arial"/>
</v:Rect>
</BODY>
</HTML>