PDA

Ver la Versión Completa : Problemas con tstringfield


mierda
09-01-2007, 14:26:51
Hola muy buenas .... teniendo el siguiente codigo:


variabletemp := TstringField.Create(self);
variabletemp.FieldName := trim(DataModule1.qtemp1.fieldbyname('etiqueta').AsString);
variabletemp.DisplayLabel := trim(DataModule1.qtemp1.fieldbyname('etiqueta').AsString);
variabletemp.DataSet := DataModule1.adotemp;
variabletemp.Name := trim(DataModule1.qtemp1.fieldbyname('etiqueta').AsString);
variabletemp.FieldKind := fkData;
DataModule1.adotemp.FieldDefs.Update;


como puedo eliminar el tstringfield q he creado???
con variabletemp.free? variabletemp.clear? variabletemp.destroy? variabletemp := nil?

Gracias de antemano

mierda
09-01-2007, 18:50:26
Hola, como ya he encontrado la respuesta la pongo por si a alguien le interesa.


var
TC: TComponent;

begin
tc := FindComponent('nombrecampo');
if not (tc = nil) then
tc.free; // liberamos la memoria
end;


Un saludo

DarKraZY
10-01-2007, 10:15:51
La respuesta que tú mismo has puesto es muy válida. Pero si el uso de la variable se limita dentro de un mismo procedure o function tal vez deberías hacerlo así

Porque es más claro
Porque te aseguras que siempre se libera


var
VariableTemp: TStringField;
begin
VariableTemp := TStringField.Create(Self);
try
// código fuente aquí
finally
VariableTemp.Free;
end;
end;