Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


textboxar till bmp bilder

Postades av 2008-11-30 18:45:39 - Joacim Kindvall, i forum visual basic - allmänt, Tråden har 8 Kommentarer och lästs av 1003 personer

En liten fundering jag har, kan man göra en bild av textboxar där texten blir med på bilden?
och kan man då, om man har mer än en textbox få dom skrivna som man gör med printer.printer objekten. använda x och y axlarna för att få dom där man vill samtidigt som man kan ändra på fonterna?
samtidigt spara dom på datorn med ett namn på?. Kanske någon rentav har en kodsnutt att dela med sig av:).
Tack på förhand
//Jocke


Svara

Sv: textboxar till bmp bilder

Postades av 2008-12-01 09:41:40 - Dmitry Baranov

> En liten fundering jag har, kan man göra en bild av textboxar där texten blir med på bilden?

Hope this article will be helpful:

http://www.vbaccelerator.com/home/net/code/controls/ListBox_and_ComboBox/TextBox_Icon/article.asp


Svara

Sv:textboxar till bmp bilder

Postades av 2008-12-01 11:26:15 - Joacim Kindvall

Tack för svaret, Men som jag kan utläsa det så är det hur man får in bilden i textboxen, Jag vill få en bild utav det som står i textboxen. Och dessutom var den koden för VB.NET och C# som jag inte är något som hällst beläst i. kanske är samma som vsnliga vb, men det blir kanske bara en massa merpulande med koden.


Svara

Sv: textboxar till bmp bilder

Postades av 2008-12-01 14:48:51 - Cecilia Wirén

Denna lilla kodsnutt ritar upp en bild med samma font och färger som textboxen på en fil vid namn tmp.jpg

        Dim b As New System.Drawing.Bitmap(TextBox.Width, TextBox.Height)
        Dim g As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(b)
        g.FillRectangle(New SolidBrush(TextBox.BackColor), 0, 0, 100, 20)
        g.DrawString(TextBox.Text, TextBox.Font, New SolidBrush(TextBox.ForeColor), TextBox.Margin.Left, TextBox.Margin.Top)
        g.Dispose()
        Dim filename = "tmp.jpg"
        b.Save(filename, System.Drawing.Imaging.ImageFormat.Jpeg)
        b.Dispose()


Svara

Sv:textboxar till bmp bilder

Postades av 2008-12-01 16:46:47 - Joacim Kindvall

Tack Cecilia,
Det ser väldigt lovande ut :)
Sitter på jobbet just nu, skall prova när jag kommer hem.


Svara

Sv: textboxar till bmp bilder

Postades av 2008-12-01 16:48:32 - Niklas Jansson

...fast det där är vb.net...

Om det bara är texten går det att lösa med något i stil med image.printText, kommer inte ihåg exakta namnet. Annars är jag rädd att du får ta en vända via WinAPI...


Svara

Sv:textboxar till bmp bilder

Postades av 2008-12-01 17:01:33 - Cecilia Wirén

Aaa, man ser inte så lätta att man hamnar i vb (ej vb.net) forumet när jag går in via 'forum senast ändrade'. sorry där Joacim, men vill du "hemmapula" med vb.net så finns det gratis express version att hämta hem ;-)


Svara

Sv: textboxar till bmp bilder

Postades av 2008-12-01 19:51:21 - Niklas Jansson

Nä, jag kör också "senast ändrade". Det var på mitt förslag den här sorteringsordningen lades in. Sen pelle gjorde ändringen för ett par år sen har en stående punkt i varje runda med förslag varit att få forumsnamnet som kolumn, tyvärr inte blivit av än. Har även legat på felanmälan ett tag om jag inte minns fel.


Svara

Sv:textboxar till bmp bilder

Postades av 2008-12-01 23:35:07 - Joacim Kindvall

Hej allesamma!
Lösningen var alldeles för nära för att man skulle se den direkt.
Tack för era förslag och andra interesanta inlägg i denna tråd.
Jag har nu kommit på lösningen :)
Sänder med mig av det lilla test jag gjort.
Lägg in tre textboxar, en picturebox med autoredraw till true och en button med följande kod i.
<code>Private Sub Command1_Click()

Picture1.CurrentX = 50 'Vänstermarginal
Picture1.FontSize = 15
Picture1.Print Text1.Text
Picture1.CurrentY = 450 'Topmarginal
Picture1.CurrentX = 50
Picture1.FontSize = 8
Picture1.Print Text2.Text
Picture1.CurrentY = 450 'Topmarginal
Picture1.Print Tab(30); Text4.Text
Picture1.Picture = Picture1.Image 'skriv ut till pictureboxen


'Spara
Dim sPath As String

sPath = App.Path & "\" & Text1 & ".bmp"
SavePicture Picture1.Image, sPath


End Sub
</code>
Då sparas en bild med textinnehållet som en bmp bild


Svara

Nyligen

  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper
  • 16:36 Allt du behöver veta om keramiskt
  • 16:14 Vem anlitar man egentligen när tak

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 725
27 958
271 751
326
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies