Wie nutze ich TNTWare Delphi Unicode Components?

[AlexII]

Hallo,

hab mir TNTWare Unicode geholt und installiert, wie nutze ich das jetzt? :gruebel:

[mkinzler]

Einfach die TNT-Version der verschiedenen Komponenten statt den originalen nehmen

[himitsu]

Da sollten sich neue Register in deiner Komponentenpalette befinden ... einfach diese Contols auf deine Form ziehen (hieß früher z.B. TTNTEdit statt TEdit) und fertig.

Die komponenten sollten intern die VCL so verbiegen, daß stattdessen ein UnicodeWindows erstellt wird und somit das Control mit Unicode läuft ... die nötigen Property der Controls sollten alle schon als WideString ausgelegt sein.

Wie gesagt, einfach draufziehen und verwenden.
Und nicht vergessen selber WideStrings zu verwenden (String ist ja nur ein AnsiString)

[mkinzler]

D2009 wäre natürlich die bessere Variante

[AlexII]

Zitat:

Zitat von himitsu

Da sollten sich neue Register in deiner Komponentenpalette befinden ...

Hm.... hab ich nicht :gruebel: Können sie sich vllt irgendwo verstecken?

[AlexII]

Zitat:

Zitat von mkinzler

D2009 wäre natürlich die bessere Variante

Wenn ich mir Delphi 2009 kaufe - muss ich in Unterhosen laufen. :pale:

[mkinzler]

Zitat:

Hm.... hab ich nicht Grübelnd... Können sie sich vllt irgendwo verstecken?

Welche Delphi-Version? TDE?

[AlexII]

Ne Delphi 7 Personal

[AlexII]

Also ich hab nur die .exe ausgeführt, muss man da vllt noch was machen?

[mkinzler]

Hat der Installer deine Delphiinstallation erkannt? Wurde die Compilierung fehlerfrei durchgeführt?
Im Zweifel die Packages manuell in der IDE öffnen und kompilieren/installieren.

[AlexII]

Zitat:

Zitat von mkinzler

Hat der Installer deine Delphiinstallation erkannt? Wurde die Compilierung fehlerfrei durchgeführt?

Ja es lief alles ok durch.

Zitat:

Im Zweifel die Packages manuell in der IDE öffnen und kompilieren/installieren.

Oh... hab ich versucht, da kommen abertausende Fehler. Wie auch bei allen anderen Unicode Tools. ElPack, TMSUnicode und wie sie da alle heißen.

[Bernhard Geyer]

Zitat:

Zitat von AlexII

Oh... hab ich versucht, da kommen abertausende Fehler. Wie auch bei allen anderen Unicode Tools. ElPack, TMSUnicode und wie sie da alle heißen.

Und welche? Ich tipp mal darauf das die fehlende DB-Unterstützung von D7 Personal Probleme bereitet.

[AlexII]

Zitat:

Zitat von Bernhard Geyer

Ich tipp mal darauf das die fehlende DB-Unterstützung von D7 Personal Probleme bereitet.

Ja genau, aber auch andere - nichts gefunden, nichts gesehen, nichts gewusst usw. Sie kommen und kommen ohne Ende.
Hier ein Screenshot

[toms]

Enferne mal alle DB Units aus dem Package.

[Bernhard Geyer]

Für die TNT's gibts irgendo D7-Personal-Kompatible Packages.

[messie]

Zitat:

Zitat von Bernhard Geyer

Für die TNT's gibts irgendo D7-Personal-Kompatible Packages.

Ich vermute mal, seit das an TMS gegangen ist, wird dieses Package nicht mehr verteilt.
@Alex: Was spricht gegen einen Download von www.tmssoftware.com? Ich bekomme als registered user zips zum Download angeboten. Testversionen gibt es da auch. Und da muss man die Packages von Hand installieren, was einem natürlich die Möglichkeit zum Modifizieren (also Rauswerfen von DB-Kompos) gibt. Ist aber mit ein paar Handgriffen getan.

Grüße, Messie

[AlexII]

Die TrialVerson hab ich schon versucht zu installieren, das ist genau so wie TNTUnicodeControls, Fehler ohne Ende usw.

Weiß nicht mehr was ich machen soll, bin schon bereit das Zeug zu kaufen, aber auch dann klappt nix. Muss wohl warten bis Delphi 2009 Personal kommt.

[omata]

Zitat:

Zitat von toms

Enferne mal alle DB Units aus dem Package.

Hast du das mal probiert?

[himitsu]

und das DB-Zeugs kann man nicht irgendwie nachrüsten?

[AlexII]

Zitat:

Zitat von toms

Enferne mal alle DB Units aus dem Package.

Verzeih keine Ahnung wie das geht.

Paar Min. später: hab versucht, aber die Fehlermeldungen bleiben die selben, wie in dem Screenshot.

[AlexII]

Hab endlich die Komponenten installiert :hello: :bouncing4: :dancer2:

Weiß vllt jemand wie ich meine Programme in Unicode umstelle?
Komponente austauschen und die String Variablen durch WideString ersetzen? Reicht das?

[himitsu]

Du solltest auch aufpassen, daß StringFunktionen WideString verarbeiten

z.B.: AnsiUpperCase/UpperCase sind nicht für Unicode gedacht.

[AlexII]

Und wie ist das z.B. mit PopupMenu? Standard PopupMenu durch TNTPopupMenu ersetzen und fertig? :gruebel:

[mkinzler]

Grundsätzlich ja.

[himitsu]

Mindestens das ersetzen, wo du Unicode benötigst

[AlexII]

Ok thx, muss mal ausprobieren? :dancer2:

[AlexII]

Hab jetzt folgendes Programm geschrieben, aber das mit Unicode funktioniert nicht überall. Im PopupMenü geht's, im Panel und die Showmessage nicht :gruebel:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, TntMenus, Menus, ExtCtrls, TntExtCtrls;

type
  TForm1 = class(TForm)
    TntPanel1: TTntPanel;
       Panel1: TPanel;

    TntPopupMenu1: TTntPopupMenu;
       PopupMenu1: TPopupMenu;

    Men2: TTntMenuItem;
    Men1: TMenuItem;

    procedure Men1Click(Sender: TObject);
    procedure Men2Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Men1Click(Sender: TObject);
begin
ShowMessage('Menü ohne Unicode, ändern, über.');
end;

procedure TForm1.Men2Click(Sender: TObject);
var a: WideString;
begin
a:='Menü mit Unicode, ändern, über.';
ShowMessage(a);
end;

end.

[fkerber]

Hi!

Wie äußert sich der Unterschied?
Bei mir sieht alles gleich aus - also die Umlaute sind überall in Ordnung?


Ciao, Frederic

[AlexII]

Hab das Programm unter nicht nem deutschen Windows ausgeführt. Auf einem deutschen wird es natürlich funktionieren, aber nicht auf ausländischen.
Oder man ändert die Sprache in der Systemsteuerung, in der Sprachoptionen.

Aber auch TntLabel und TntEdit funken nicht. :pale:

[messie]

Mach' mal einen Screenshot, wie es bei Dir aussieht.

Wie hat denn die Installation geklappt? Ich hab' es nämlich auch mal versucht, bin aber steckengeblieben.

Test der Unicodefähigkeit: einfach Text von einer chinesischen oder taiwanesischen Homepage kopieren und als Caption einsetzen. Dann siehst Du es schon zur Entwurfszeit.

Grüße, Messie

[AlexII]

Die Installation hat sehr gut verlaufen.
Ich teste das so, schreibe ein Testprogramm mit Umlauten und öffne das Prog auf nem russischen Windows, die Umlaute werden da nicht richtig erkannt, im TntPopupMenü aber schon. :gruebel:

[messie]

Woher bekommst Du denn Deine Umlaute im Text? Denn die Umlaute, die in Deinem Beispiel waren, sind ja als string(ANSI) übergeben. Ich denke, da wird noch der Cast benötigt.

Probier' mal so:

Delphi-Quellcode:

procedure TForm1.Men2Click(Sender: TObject);
var a: WideString;
begin
a:=WideString('Menü mit Unicode, ändern, über.');
WideShowMessage(a);
end;

Grüße, Messie

[AlexII]

Bekomme die Fehlermeldung: Undefinierter Bezeichner - WideShowMessage.

Und was ist z.b. mit Label und Edit? Da gehts's auch nicht.

[messie]

Zitat:

Zitat von AlexII

Bekomme die Fehlermeldung: Undefinierter Bezeichner - WideShowMessage.

Und was ist z.b. mit Label und Edit? Da gehts's auch nicht.

Die müssen vom Typ TTntLabel und TTntEdit sein.
Das WideShowMessage nicht gefunden wird, könnte an einem fehlenden Suchpfad liegen oder Du hast die TntDialogs nicht in der uses-Liste.

Grüße, Messie

[AlexII]

Das ist es ja grade, dass die Komponenten vom Typ TTntLabel und TTntEdit habe. :wall:

[messie]

Zitat:

Zitat von AlexII

Das ist es ja grade, dass die Komponenten vom Typ TTntLabel und TTntEdit habe. :wall:

Den Satz habe ich nicht wirklich verstanden.

mach doch mal bitte einen Screenshot von diesem Projekt auf russischem Windows:

Delphi-Quellcode:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, TntStdCtrls;

type
  TForm1 = class(TForm)
    TntLabel1: TTntLabel;
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  TntLabel1.Caption := WideString('Die blöden Ösen');
end;

end.

Grüße, Messie

[AlexII]

Hier ein Screenshot.

Das mit dem TntLabel will nicht gehen. Muss ich vllt in die Uses was einbinden?

[messie]

Wenn das Angehängte Beispiel nicht klappt, solltest Du mal eine andere Schriftart verwenden (Arial). Ich hatte das schon, dass russich auf einem französischen Windows nicht dargestellt werden konnte, weil die einen anderen Zeichenumfang für MS Sans Serif haben als beim deutschen Windows.

Grüße, Messie

[AlexII]

Das stimmt, es lag an der Schrift, wow :thumb: :dancer2:

Weiß vllt jemand wo man Tutorials oder Dokus von TNT Unicode finden kann?

[messie]

Zitat:

Zitat von AlexII

Weiß vllt jemand wo man Tutorials oder Dokus von TNT Unicode finden kann?

Im Prinzip braucht man keine Doku. Die Unicode Tools stellen ja überwiegend nur die unicodefähigen Kompos bereit, die in der VCL schon da sind.
Meist reicht also die Delphi-Hilfe. Wenn die Unicode-Tools mehr können, steht das meist in der Versionsdatei. Wenn Du die Vollversion für einen Platz kaufst, bekommst Du die Quellen dazu und kannst bei TMS Fragen dazu stellen. Und hier eigentlich auch.

Übrigens würde ich immer noch gerne wissen, wie Du die Tools mit der D7 personal verheiratet hast. Mir ist das bisher noch nicht gelungen.

Grüße, Messie