File:  [mozdev] / mozptch / anzname.pas
Revision 1.1: download - view: text, annotated - select for diffs - revision graph
Sun Mar 14 12:49:07 2004 UTC (15 years, 9 months ago) by oertel
Branches: MAIN
CVS tags: version_30_05_04, ver_2004_04_12_fire_thunder_beta, HEAD
Initial commit version 9.29

(* Copyright (c) uib umwelt informatik buero gmbh (www.uib.de)
 This sourcecode is owned by uib
 and published under the Terms of the General Public License.
#*###CVS_HEAD_START###******************************************************
# $Id: anzname.pas,v 1.1 2004/03/14 12:49:07 oertel Exp $
#
#*###EXCLUDE_CVS_LOG###*****************************************************
# History:
# ========
#
# $Log: anzname.pas,v $
# Revision 1.1  2004/03/14 12:49:07  oertel
# Initial commit version 9.29
#
*)

unit AnzName;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls, Buttons, QStdCtrls, QButtons, QControls, QExtCtrls;

type
  TFAnzName = class(TForm)
    Panel1: TPanel;
    newUname: TEdit;
    newUnameLabel: TLabel;
    textLabel: TLabel;
    BitBtn1: TBitBtn;
    procedure FormShow(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  FAnzName: TFAnzName;

implementation

{$R *.xfm}



procedure TFAnzName.FormShow(Sender: TObject);
begin
  textlabel.Caption := 'Standardmäßig wird als Autoren-Name für eine Mail der Benutzername auf dem BK-Server angezeigt. '+
                       'Wenn Sie stattdessen lieber einen anderen Namen (z.B. Ihren Vor- und Nachnamen) anzeigen lassen wollen, '+
                       'können Sie den Standard-Eintrag im untenstehenden Textfeld entsprechend ändern. ';
end;


end.

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>