Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
Numar circuite IPAT si prindere t...

Pareri brgimportchina.ro - teapa ...

Lucruri inaintea vremurilor lor

Discuții despre TVR Sport HD
 Cost abonament clinica privata

Tremura toata, dar nu de la ro...

Renault Android

Recomandare bicicleta e-bike 20&#...
 Bing-Content removal tool

Nu pot accesa monitorulsv.ro de l...

Cum sa elimini urmele de acnee?

Wc Geberit
 Routere detinute in trecut si in ...

Teii din fața casei

E-Mail in serie prin Excel si Out...

Modul alimentare rulou/jaluzea ex...
 

Print Screen + Edit

- - - - -
  • Please log in to reply
5 replies to this topic

#1
lastbullet

lastbullet

    Junior Member

  • Grup: Members
  • Posts: 114
  • Înscris: 16.08.2006
Salut,

am nevoie de un program ceva mai special. Adica: o data lansat la apasarea tastei Print Screen sa faca PS la ecran, sa incarce in program imaginea iar eu sa pot adauga text pe aceasta imagine ce va fi printata ulterior. Am reusit oarecum sa realizez partea cu Print Screen-ul si cea de listare a pozei, dar am probleme la incarcarea pozei din clipboard in program si la adaugarea textului pe ea. Aveti ceva idei cum s-ar putea face? Mersi

#2
lastbullet

lastbullet

    Junior Member

  • Grup: Members
  • Posts: 114
  • Înscris: 16.08.2006

 lastbullet, on Jun 26 2007, 09:10, said:

Salut,

am nevoie de un program ceva mai special. Adica: o data lansat la apasarea tastei Print Screen sa faca PS la ecran, sa incarce in program imaginea iar eu sa pot adauga text pe aceasta imagine ce va fi printata ulterior. Am reusit oarecum sa realizez partea cu Print Screen-ul si cea de listare a pozei, dar am probleme la incarcarea pozei din clipboard in program si la adaugarea textului pe ea. Aveti ceva idei cum s-ar putea face? Mersi


Am reusit sa fac sa incarce si poza in aplicatie (intr-un PictureBox) dar am nevoie de un sfat pentru adaugarea textului pe poza respectiva. Stie cineva daca se poate adauga text pe un obiect dintr-un picturebox?

#3
queensoft

queensoft

    Trust no one

  • Grup: Banned
  • Posts: 16,079
  • Înscris: 26.11.2005
old1 = Picture1.FillStyle 'nu stiu daca iti trebuie, e scos din-tro aplicatie mai mare a mea
old2 = Picture1.FillColor ' salveaza proprietatile
Picture1.FillStyle = 1
Picture1.FillColor = 1
Picture1.CurrentX = 10 ' pozitia pentru text
Picture1.CurrentY = 10
oldX1 = 10
oldY1 = 10
oldcolor = Picture1.ForeColor
Picture1.ForeColor = textcolor
Picture1.Print Text1.Text ' textul de scris
Picture1.FillStyle = old1 ' pune la loc caracteristicile originale
Picture1.FillColor = old2
Picture1.ForeColor = oldcolor

Pentru salvare foloseste asa:
SavePicture Picture1.Image, "D:\test.bmp"

S-ar putea sa nu mearga (afiseaza textul, dar nu salveaza decit imaginea fara text). Mi se pare ca faza depinde de modul in care ai transferat imaginea in picturebox. Eu fac asa: Picture1.Picture = LoadPicture(CommonDialog1.FileName)

Edited by queensoft, 01 July 2007 - 13:48.


#4
lastbullet

lastbullet

    Junior Member

  • Grup: Members
  • Posts: 114
  • Înscris: 16.08.2006
Mersi de ajutor dar nu merge, nu apare textul din textbox pe imagine. O sa mai caut. PS: imaginea nu o incarc cu Picture1.Picture = LoadPicture(CommonDialog1.FileName) ci cu Picture1.Picture = Clipboard.GetData(vbCFBitmap).

Si inca ceva, nu stiti de ce nu pot lista imaginea din picture box cu:
Printer.PaintPicture Picture1.Picture, 0, 0

Edited by lastbullet, 02 July 2007 - 13:03.


#5
..:: CLAW ::..

..:: CLAW ::..

    Junior Member

  • Grup: Members
  • Posts: 51
  • Înscris: 16.12.2006
Trebuie sa mai pui inainte cateva chestii (nu stiu nici eu exact ce). Cam asa ceva (in Paint Event):
Dim MyBitmap As New Bitmap
MyBitmap = Picture1.Picture

si mai departe nu stiu :D

Edited by ..:: CLAW ::.., 16 August 2007 - 15:48.


#6
Alex3377

Alex3377

    Junior Member

  • Grup: Members
  • Posts: 36
  • Înscris: 10.08.2007
ncearca acest api
Private Declare Function DrawText Lib "user32" Alias "DrawTextA" (ByVal hdc As Long, ByVal lpStr As String, ByVal nCount As Long, lpRect As RECT, ByVal wFormat As Long) As Long

Private Const DT_BOTTOM = &H8
Private Const DT_CALCRECT = &H400
Private Const DT_CENTER = &H1
Private Const DT_LEFT = &H0
Private Const DT_NOCLIP = &H100
Private Const DT_NOPREFIX = &H800
Private Const DT_RIGHT = &H2
Private Const DT_SINGLELINE = &H20
Private Const DT_TABSTOP = &H80
Private Const DT_TOP = &H0
Private Const DT_VCENTER = &H4
Private Const DT_WORDBREAK = &H10
+ constante

Anunturi

Bun venit pe Forumul Softpedia!

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate