Autor Beitrag
Aton
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 125

Windows XP
D7 Enterprise
BeitragVerfasst: Fr 19.03.04 09:30 
Hallo Forum,

ich übersetze gerade ein Programm. Dazu habe ich eine Funktion GetLanguage(s: String);
Jetzt schreibe ich hunderte Mal für jedes Element:

ausblenden Quelltext
1:
2:
xxx.Caption := GetLanguage('...');
xxx.Hint := GetLanguage('...');


Jetzt meine Frage: Kann ich in Delphi eine Tastenkombination erstellen, das automatisch
".Caption := GetLanguage('" eingefügt wird? Und genauso für ".Hint := GetLanguage('"?

Ich bräuchte also entweder so eine Tastenkombination oder mehrere Zwischenablagen?

Danke für die Antwort,
Gruß Jens.
AndyB
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1173
Erhaltene Danke: 14


RAD Studio XE2
BeitragVerfasst: Fr 19.03.04 11:16 
Wie wäre es, wenn du den Funktionsnamen abkürzt.

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
function _(const S: string): string;
begin
  Result := GetLanguage(S);
end;

xyz.Hint := _('Dies ist ein Text');


Das _() hat auch den Vorteil, dass du ganz schnell auf dxgettext umsteigen kannst.

_________________
Ist Zeit wirklich Geld?