AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Text in TEdit ausrichten

Ein Thema von Ganymed · begonnen am 24. Mär 2009 · letzter Beitrag vom 1. Apr 2009
Antwort Antwort
Seite 2 von 2     12
Ganymed

Registriert seit: 11. Jun 2003
Ort: Hameln
56 Beiträge
 
Delphi 7 Architect
 
#11

Re: Text in TEdit ausrichten

  Alt 31. Mär 2009, 15:03
Bis darauf, dass ich im case das taLeftJustify lieber als else-Fall formuliert habe, habe ich das genauso gebaut

Zitat von DeddyH:
Du scheinst den Speicher anderweitig zu verschwenden
Halte ich für unwahrscheinlich Das Speicehrleckt war in der TEdit-Klasse. Ich habe das mal auf die ganzen Vererbungen zurückgefüghrt. (Um es genau zu beschreiben: Ich habe verschiedene Units, in denen ich TFrame immer weiter ableite. Die Crackerklasse habe ich in eine eigene Unit ausgelagert. Diese Cracker-Unit habe ich zunächst nur in der "Eltern"-Unit meines Frames verwendet. Wenn ich dann ein davon abgeleitetes Frame erzeugt und wieder freigegeben habe, kam es zur Speicehrverletzung. Nun habe ich in allen Units, die mein Frame ableiten auch die Cracker-Unit drin und es funzt prima.)
  Mit Zitat antworten Zitat
Benutzerbild von Chemiker
Chemiker

Registriert seit: 14. Aug 2005
1.858 Beiträge
 
Delphi 11 Alexandria
 
#12

Re: Text in TEdit ausrichten

  Alt 31. Mär 2009, 22:23
Hallo Ganymed,

da Du D2007 auch besitzt, würde sich für die Lösung Deines Problems auch einen Class helper eignen.

z.B.:

Delphi-Quellcode:
unit uEditClassHelper;

interface

uses
  Classes, StdCtrls, Windows;

type
  EditClassHelper = Class helper for TEdit
  public
    procedure Rechtsbündig;
    procedure Linksbündig;
  End;

implementation

procedure EditClassHelper.Rechtsbündig;
begin
  SetWindowLong(self.Handle, GWL_ExStyle,
                GetWindowLong(self.Handle, GWL_ExStyle) or WS_EX_Right);
end;

procedure EditClassHelper.Linksbündig;
begin
  SetWindowLong(self.Handle, GWL_ExStyle,
                GetWindowLong(self.Handle, GWL_ExStyle) or WS_EX_LEFT);
end;

end.
Der Aufruf:

Delphi-Quellcode:
Edit1.rechtsbündig;
  Edit1.Text:= 'test';
Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.
  Mit Zitat antworten Zitat
taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#13

Re: Text in TEdit ausrichten

  Alt 31. Mär 2009, 23:07
Moin, Moin.
Das ist ja minimaler Aufwand,
ab welcher Delphi-Version funktioniert denn das so?
Mein D7 kennt keine "TClassHelperBase"
Ralph
  Mit Zitat antworten Zitat
Benutzerbild von Chemiker
Chemiker

Registriert seit: 14. Aug 2005
1.858 Beiträge
 
Delphi 11 Alexandria
 
#14

Re: Text in TEdit ausrichten

  Alt 31. Mär 2009, 23:20
Hallo taaktaak,

ich habe es mit D2006 geschrieben.

Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.
  Mit Zitat antworten Zitat
taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#15

Re: Text in TEdit ausrichten

  Alt 31. Mär 2009, 23:56
Hmmm, das wäre vielleicht ein Grund mal auf eine modernere Version umzusteigen
Ralph
  Mit Zitat antworten Zitat
Benutzerbild von Chemiker
Chemiker

Registriert seit: 14. Aug 2005
1.858 Beiträge
 
Delphi 11 Alexandria
 
#16

Re: Text in TEdit ausrichten

  Alt 1. Apr 2009, 09:07
Hallo taaktaak,

allerdings würde ich unter normalen Umständen die TEdit – Komponente ableiten und um die Funktionalität erweitern.
Aber diesem Fall soll ja keine andere Komponente benutzt werden.

Trotzdem lohnt sich der Umstieg von D7 nach >D2005.

Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.
  Mit Zitat antworten Zitat
taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#17

Re: Text in TEdit ausrichten

  Alt 1. Apr 2009, 12:34
Moin, Moin Chemiker
- nun gut, in diesem speziellen Fall hat "man" das natürlich auch schon so gemacht. Nachdem ich sehr oberflächlich die Möglichkeiten dieses Verfahrens angeschaut habe, ergeben sich damit ja wohl sehr weitgehende und komfortable Optionen. Werde mich wohl doch einmal mit der neuen Oberfläche anfreunden müssen.
Ralph
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:51 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz