|
Ok, creo que hablé un poco mal el tono. Perdón.
He buscado por ahí pero no entiendo lo suficientes, al ayuda está en inglés y no entiendo exactamente.
Alguien puede dar un ejemplo pequeño de guardar este dato de cambiar de color en un ini con un label.
Que hay que hacer.
Dicen que es facil y yod e facil no veo nada. además nunca he hecho esto y me parece muy complicado.
Empezamos con el form desde cero y con un label1 dentro, el código de moemnto sería así. DEspués de todo esto no se que hacer, simplemente quiero que se guarde el color que deseo cuando cierre el programa.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
procedure Label1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Label1Click(Sender: TObject);
begin
with font do
case font.color of
clWindowText: font.Color := clred;
clred: font.Color := clWindowText;
end;
end;
end.
Última edición por REHome fecha: 03-12-2004 a las 14:25:16.
|