灌水 - 一個簡單到只要隨便"估狗"都可以免費下載的程式

[魔術王子]

有這麼好用的語法喔
這是用vb 2008完全不用引用API

PHP 語法:

        Me.Hide()
        Dim dt As Double = My.Computer.Clock.TickCount
        While My.Computer.Clock.TickCount - dt < 1000
            My.Application.DoEvents()
        End While
        Dim g As Graphics
        Dim bmp As Bitmap
        bmp = New Bitmap(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height)
        g = Graphics.FromImage(bmp)
        g.CopyFromScreen(New Point(0, 0), New Point(0, 0), New Size(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height))
        g.Dispose()
        'Dim i As Integer = 1
        'While (My.Computer.FileSystem.FileExists(My.Computer.FileSystem.SpecialDirectories.Desktop & "\ToyAide" & i & ".jpg"))
        ' i += 1
        ' End While
        ' bmp.Save(My.Computer.FileSystem.SpecialDirectories.Desktop & "\ToyAide" & i & ".jpg")
        'PictureBox1.Image = bmp
        Me.Show()
        PictureBox1.Image = bmp 


當然這是從網路上找到的,另外.NET還有圖片翻轉功能

PHP 語法:

        If PictureBox1.Image IsNot Nothing Then
            Dim Img As Image = PictureBox1.Image
            Img.RotateFlip(RotateFlipType.Rotate270FlipNone)
            PictureBox1.Image = Img
            Img = Nothing
            ImageSize()
        End If 


再附加尺寸縮小語法

PHP 語法:

        ' If My.Computer.Clipboard.ContainsImage Then
        ' Get the scale factor.
        Dim scale_factor As Single = 0.5 'Single.Parse(txtScale.Text)

        ' Get the source bitmap.
        Dim bm_source As New Bitmap(PictureBox1.Image)

        ' Make a bitmap for the result.
        Dim bm_dest As New Bitmap(CInt(bm_source.Width * scale_factor), CInt(bm_source.Height * scale_factor))

        ' Make a Graphics object for the result Bitmap.
        Dim gr_dest As Graphics = Graphics.FromImage(bm_dest)

        ' Copy the source image into the destination bitmap.
        gr_dest.DrawImage(bm_source, 0, 0, bm_dest.Width + 1, bm_dest.Height + 1)

        ' Display the result.
        ' My.Computer.Clipboard.SetImage(bm_dest)
        ' PictureBox1.Image = My.Computer.Clipboard.GetImage
        'PictureBox1.Image = bm_dest
        '  End If
        PictureBox1.Image = bm_dest
        ImageSize() 


[魔術王子]

這是BCB用API的程式碼而且還利用GetCursorInfo()取得游標資訊,加入游標,這部分在.NET還找不到程式碼

PHP 語法:

    ShowWindow(Application->Handle,SW_HIDE);
    ShowWindow(Handle,SW_HIDE);
  //  Application->ProcessMessages();
    DWORD bt;
    bt=GetTickCount();
    do {
      Application->ProcessMessages();
    } while (GetTickCount()-bt<(Edit2->Text.ToInt()*1000));
    HDC ScrDC;
    TRect R;
    HWND Wnd=GetDesktopWindow();
    ScrDC=GetWindowDC(Wnd);
    GetWindowRect(Wnd, &R);
    ImageBmp->Width = R.right;
    ImageBmp->Height = R.bottom;
    BitBlt(ImageBmp->Canvas->Handle, 0, 0, R.right, R.bottom, ScrDC, 0, 0, SRCCOPY);
    if(CheckBox1->Checked){
      CURSORINFO ci;
      ci.cbSize=sizeof(CURSORINFO);
      GetCursorInfo(&ci);
      POINT pt;
      GetCursorPos(&pt);
      DrawIcon(ImageBmp->Canvas->Handle, pt.x, pt.y, ci.hCursor);
    }
    ReleaseDC(Wnd, ScrDC);
    float sf=(float)ImageBmp->Width/(float)ScrollBox1->ClientRect.right;
    Image1->Width=ImageBmp->Width/sf;
    Image1->Height=ImageBmp->Height/sf;
    Image1->Picture->Assign(ImageBmp);
    Image1->Refresh();
    ShowWindow(Application->Handle,SW_NORMAL);
    ShowWindow(Handle,SW_NORMAL); 


[mini]

抓游標?
取得游標的座標後
再把 游標的圖 事後合成上去就可以了
(應該是這樣...?)

[魔術王子]

作者: mini

抓游標?
取得游標的座標後
再把 游標的圖 事後合成上去就可以了
(應該是這樣...?)

我這兩天使用HyperSnap後發現,HyperSanap一啟動會先將剪貼簿清除
然後監視剪貼簿,只要有人按下PrtScr鍵,程式就會將資料取出,加入游標,顯示出來
或將自己隱藏,重新擷取畫面,加入游標
因為程式是"執行中",所以不需要將資料再存回剪貼簿

[ppp0600]

想請問可有簡單的網頁版通訊錄管理

[不飛]

作者: ppp0600

想請問可有簡單的網頁版通訊錄管理

Gmail 通訊錄就口已的啦.....

安卓手機 換機換號 不用煩惱，直接從 Gmail 通訊錄下載聯絡人即可。

[superxboy]

我都用PicPick來截圖...可以設定截取游標

[ppp0600]

作者: 不飛

Gmail 通訊錄就口已的啦.....

安卓手機 換機換號 不用煩惱，直接從 Gmail 通訊錄下載聯絡人即可。

其實我是想弄個網頁版給一個社群的人使用，只是不會寫程式，也想不到辦法

[魔術王子]

作者: ppp0600

想請問可有簡單的網頁版通訊錄管理

為了脫離電腦領域,只要跟網頁有關的程式設計小弟一概不碰

[getter]

作者: 魔術王子

為了脫離電腦領域,只要跟網頁有關的程式設計小弟一概不碰

為了脫離電腦領域，迪西一律說「我只會玩，不會修。要修電腦請找電腦公司。」

[getter]

迪西都用 FSCapture 免費版的說 ...，該有的功能都有 ...

DOS 時代則是用遊戲修改工具內附的抓圖工具 ...