|
| Havd betyder denne fejl Fra : Michael Vilhelmsen |
Dato : 13-02-02 12:21 |
|
Win32 Error. Code: 1400.
Ugyldig vindues-handle
Den kommer i forbindelse med dette:
frmUdskTransportVarer := nil;
try
frmUdskTransportVarer := TfrmUdskTransportVarer.Create(nil);
frmUdskTransportVarer.qrTransportVarer.PreviewModal;
finally
frmUdskTransportVarer.Free;
frmUdskTransportVarer := nil;
end;
Fejler kommer ved .FREE kaldet.
--
Med venlig hilsen / Best Regards
Michael Vilhelmsen
Remove.NoSpam from email before replaying !
| |
Anders Holm Jensen (13-02-2002)
| Kommentar Fra : Anders Holm Jensen |
Dato : 13-02-02 12:40 |
|
"Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> skrev i en
meddelelse news:m%ra8.8196$5L3.420283@news010.worldonline.dk...
> Win32 Error. Code: 1400.
> Ugyldig vindues-handle
>
> Den kommer i forbindelse med dette:
>
> frmUdskTransportVarer := nil;
> try
> frmUdskTransportVarer := TfrmUdskTransportVarer.Create(nil);
> frmUdskTransportVarer.qrTransportVarer.PreviewModal;
> finally
> frmUdskTransportVarer.Free;
> frmUdskTransportVarer := nil;
> end;
>
> Fejler kommer ved .FREE kaldet.
Hej
Jeg fandt dette i hjælp, jeg ved ikke om det kan hjælpe ?
Hilsen AHJ
Destroys an object and frees its associated memory, if necessary.
procedure Free;
Description
Use Free to destroy an object. Free automatically calls the Destroy if the
object instance is not nil. Any object instantiated at runtime that does not
have an Owner should be destroyed by a call to Free, so that the object can
be properly destroyed and the memory released. Free is successful even if
the object is nil, so if the object was never initialized, for example,
calling Free won't result in an error.
When you call Free for a component, it will call Free for all components
that it owns, that is, all components in its component list. A form owns all
the controls and non-visual components that are created on it in design
mode. When it is freed, all of these components are automatically freed as
well. Since, by default, all forms are owned by the Application object, when
the application terminates, it frees the Application object, which frees all
forms. For all objects that are not components, or for components created by
a nil owner, be sure to call Free after you are finished with the object;
otherwise the memory allocated to the object will not be usable until after
the application terminates.
You should never explicitly free a component within one of its own event
handlers, nor should you free a component from an event handler of a
component the component owns or contains. For example, you should avoid
freeing a button in its OnClick event handler. Nor should you free the form
that owns the button from the button's OnClick event.
If you want to free the form, call the Release method, which destroys the
form and releases the memory allocated for it after all its event handlers
and those of the components it contains are through executing.
>
>
>
> --
> Med venlig hilsen / Best Regards
> Michael Vilhelmsen
> Remove.NoSpam from email before replaying !
>
>
>
>
| |
Thomas Munk (13-02-2002)
| Kommentar Fra : Thomas Munk |
Dato : 13-02-02 15:12 |
|
Jeg mener at man altid bør bruge Release i stedet for Free når det fælder
Forms.
Tjek evt. hjælp til TCustomForm.Release
"Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> wrote in message
news:m%ra8.8196$5L3.420283@news010.worldonline.dk...
> Win32 Error. Code: 1400.
> Ugyldig vindues-handle
> Den kommer i forbindelse med dette:
>
> frmUdskTransportVarer := nil;
> try
> frmUdskTransportVarer := TfrmUdskTransportVarer.Create(nil);
> frmUdskTransportVarer.qrTransportVarer.PreviewModal;
> finally
> frmUdskTransportVarer.Free;
> frmUdskTransportVarer := nil;
> end;
>
> Fejler kommer ved .FREE kaldet.
| |
Michael Vilhelmsen (13-02-2002)
| Kommentar Fra : Michael Vilhelmsen |
Dato : 13-02-02 15:58 |
|
Det kan godt være, at du har ret.
problemet er bare, at jeg HAR lavet en appliction med ca. 300 forms i, og
alle disse kaldes med FREE til sidst.
Under alle omstædigheder virker det, hvis jeg bruger RELEASE.
--
Med venlig hilsen / Best Regards
Michael Vilhelmsen
Remove.NoSpam from email before replaying !
"Thomas Munk" <thomasmunk@ofir.dk> skrev i en meddelelse
news:3c6a73f3$0$62881$edfadb0f@dspool01.news.tele.dk...
> Jeg mener at man altid bør bruge Release i stedet for Free når det fælder
> Forms.
>
> Tjek evt. hjælp til TCustomForm.Release
>
>
> "Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> wrote in message
> news:m%ra8.8196$5L3.420283@news010.worldonline.dk...
> > Win32 Error. Code: 1400.
> > Ugyldig vindues-handle
> > Den kommer i forbindelse med dette:
> >
> > frmUdskTransportVarer := nil;
> > try
> > frmUdskTransportVarer := TfrmUdskTransportVarer.Create(nil);
> > frmUdskTransportVarer.qrTransportVarer.PreviewModal;
> > finally
> > frmUdskTransportVarer.Free;
> > frmUdskTransportVarer := nil;
> > end;
> >
> > Fejler kommer ved .FREE kaldet.
>
>
| |
Michael Vilhelmsen (13-02-2002)
| Kommentar Fra : Michael Vilhelmsen |
Dato : 13-02-02 16:01 |
|
Som sagt virker release.
Men ikke på en Data Model.
Her skal jeg stadigvæk klade FREE eller hvad ?
--
Med venlig hilsen / Best Regards
Michael Vilhelmsen
Remove.NoSpam from email before replaying !
"Thomas Munk" <thomasmunk@ofir.dk> skrev i en meddelelse
news:3c6a73f3$0$62881$edfadb0f@dspool01.news.tele.dk...
> Jeg mener at man altid bør bruge Release i stedet for Free når det fælder
> Forms.
>
> Tjek evt. hjælp til TCustomForm.Release
>
>
> "Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> wrote in message
> news:m%ra8.8196$5L3.420283@news010.worldonline.dk...
> > Win32 Error. Code: 1400.
> > Ugyldig vindues-handle
> > Den kommer i forbindelse med dette:
> >
> > frmUdskTransportVarer := nil;
> > try
> > frmUdskTransportVarer := TfrmUdskTransportVarer.Create(nil);
> > frmUdskTransportVarer.qrTransportVarer.PreviewModal;
> > finally
> > frmUdskTransportVarer.Free;
> > frmUdskTransportVarer := nil;
> > end;
> >
> > Fejler kommer ved .FREE kaldet.
>
>
| |
Thomas Munk (13-02-2002)
| Kommentar Fra : Thomas Munk |
Dato : 13-02-02 17:07 |
|
"Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> wrote in message
news:fdva8.8653$5L3.426331@news010.worldonline.dk...
> Som sagt virker release.
>
> Men ikke på en Data Model.
> Her skal jeg stadigvæk klade FREE eller hvad ?
Ja, TDataModule er ikke en form (ikke nedarvet fra TCustomForm). Derfor
ingen Release, men derimod go'e gamle Free...
| |
Michael Vilhelmsen (13-02-2002)
| Kommentar Fra : Michael Vilhelmsen |
Dato : 13-02-02 20:51 |
|
Tusind tak.
Michael
"Thomas Munk" <thomasmunk@ofir.dk> skrev i en meddelelse
news:3c6a8ee8$0$62868$edfadb0f@dspool01.news.tele.dk...
> "Michael Vilhelmsen" <ccc37780.NoSpam@vip.cybercity.dk> wrote in message
> news:fdva8.8653$5L3.426331@news010.worldonline.dk...
> > Som sagt virker release.
> >
> > Men ikke på en Data Model.
> > Her skal jeg stadigvæk klade FREE eller hvad ?
>
>
> Ja, TDataModule er ikke en form (ikke nedarvet fra TCustomForm). Derfor
> ingen Release, men derimod go'e gamle Free...
>
>
| |
|
|