Jak poprawnie skonwertować kod justowania tekstu z VB6 do VB.NET 2008?

janek1111 napisał:

Jeśli ktoś zna inny sposób na justowanie tekstu vb.net, to prosiłbym o sugestie

Oto odpowiedź: Extending RichTextBox

Dodaj klasę AdvRichTextBox i wklej w niej kod:

Po czym skompiluj program i dowolnym Form wstaw AdvRichTextBox (na samej górze: "nazwa programu" Components).

Następnie umieść sobie przycisk do justowania zaznaczonej treści i oprogramuj zdarzenie wywoływane po kliknięciu np.:


Normalnie w RichTextBox nie ma opcji justowania, a teraz już jest

janek1111 napisał:

wydrukować w "PrintDocument_Page" wykorzystując przy tym rysowanie

hmmm... nigdy tego nie używałem, a przynajmniej jeszcze nie.

Ja obecnie drukowanie ograniczam do wydruku licencji z Rich Text Boxa. Natomiast wiem, że można robić cuda w CrystalReports. Przerobiłem kiedyś sporo tutoriali, ale ostatecznie nie miałem takiego zlecenia więc zostawiłem temat.

Na pocieszenie powiem, że do RichTextBoxa też można dodawać grafikę np.:


--edit--
Właściwie to źle powiedziałem... kontrolkę PrintDocument używałem już, ale do drukowania plików rtf z RichTextBox.

Znalezłem taki kod:


Niby to działa, ale trzeba by coś pokombinować z wymiarami strony.

...ale ten Microsoft pomocny
Znalazłem takie coś: How to print...

Zmodyfikowałem AdvRichTextBox do postaci:


Form1.vb:


Wymagane komponenty:
1. OpenFileDialog (wstawianie obrazków)
2. PrintingDocument
3. PrintDialog
4. PrintPreviewDialog
5. PageSetupDialog

W 4 i 5 należy wybrać z listy dokument bo inaczej to nie zadziała.



Cały projekt w VB.NET 2008 EE (ustawiłem prowizję, ale nie musisz go pobierać o ile powyższy kod zadziała:

janek1111 napisał:

Dlatego prosiłbym o pomoc w konwersji kodu w podanym przeze mnie linku

To nie jest możliwe od tak... Obiekt Printer nie istnieje w vb.net i nie ma odpowiednika, podobnie wygląda to w przypadku Picture, niby jest PictureBox, ale ma inne parametry. Autor programu zakłada, że zarówno Picture jak i Printer posiadają takie cechy jak FontBold itp.

Istnieje rozwiązanie polegające na instalacji tzw. PowerPack ale w tym zakresie musisz posłużyć się pomocą Microsoftu bo rozwiązanie nie jest popularne.

Wtedy może w nagłówku klasy wpisać:

Jednak bez odpowiednich referencji uzyskuje się komunikat:

VS napisał:

Warning 1 Namespace or type specified in the Imports 'Microsoft.VisualBasic.PowerPacks.Printing.Compatibility.VB6' doesn't contain any public member or cannot be found. Make sure the namespace or the type is defined and contains at least one public member. Make sure the imported element name doesn't use any aliases.

Nie wiem czy nie łatwiej było by zrobić bibliotekę dll w VB6 i podłączyć ją w VB.NET. Ja robiłem takie coś z Fortranem, co znacznie przyspieszyło operacje matematyczne.