Diagnose program

Jeg er ved at lave et diagnose program til windows, så jeg ville lige høre om hvordan man gør sådan at man kan se hvor meget disk plads der er brugt, hvor meget der er tilbage og hvor meget der er i alt.

Håber i forstår.

Mvh
Jesper

Til at se hvor meget diskplads der er i alt skal du bruge funktionen DiskSize(Drev);

Fri diskplads: DiskFree(Drev);

Diskplads brugt: DiskSize(Drev); - DiskFree(Drev);

Drev er nummeret for drevet fx. 1=drev A, 2=drev B, osv.

Hvis drevet er ugyldigt (fx. hvis det ikke findes eller hvis det er en diskette- eller cd-drev hvor der ikke en en disk i) retunerer den -1.


skal man skrive noget i uses for hvis jeg skriver:

label1.Caption := DiskFree(3);

kommer den med den her fejl:

[Error] Unit1.pas(29): Incompatible types: 'String' and 'Int64'

hvad skal jeg laver om på???

SpeC

Du skal skrive label1.Caption := IntToStr(DiskFree(3));

Emil Melgaard
<a href="mailto:emil.melgaard@private.dk">emil.melgaard@private.dk</a>

Jeg er ved at lave et diagnose program til windows, så jeg ville lige høre om hvordan man gør sådan at man kan se hvor meget disk plads der er brugt, hvor meget der er tilbage og hvor meget der er i alt.

Håber i forstår.

Mvh
Jesper

Til at se hvor meget diskplads der er i alt skal du bruge funktionen DiskSize(Drev);

Fri diskplads: DiskFree(Drev);

Diskplads brugt: DiskSize(Drev); - DiskFree(Drev);

Drev er nummeret for drevet fx. 1=drev A, 2=drev B, osv.

Hvis drevet er ugyldigt (fx. hvis det ikke findes eller hvis det er en diskette- eller cd-drev hvor der ikke en en disk i) retunerer den -1.

Emil Melgaard
<a href="mailto:emil.melgaard@private.dk">emil.melgaard@private.dk</a>

Jeg er ved at lave et diagnose program til windows, så jeg ville lige høre om hvordan man gør sådan at man kan se hvor meget disk plads der er brugt, hvor meget der er tilbage og hvor meget der er i alt.

Håber i forstår.

Mvh
Jesper

Til at se hvor meget diskplads der er i alt skal du bruge funktionen DiskSize(Drev);

Fri diskplads: DiskFree(Drev);

Diskplads brugt: DiskSize(Drev); - DiskFree(Drev);

Drev er nummeret for drevet fx. 1=drev A, 2=drev B, osv.

Hvis drevet er ugyldigt (fx. hvis det ikke findes eller hvis det er en diskette- eller cd-drev hvor der ikke en en disk i) retunerer den -1.

Emil Melgaard
<a href="mailto:emil.melgaard@private.dk">emil.melgaard@private.dk</a>

Det virker ikke. Den læser godt nok fra drevet men der står bare ikke noget.
Mvh
Jesper

Jeg er ved at lave et diagnose program til windows, så jeg ville lige høre om hvordan man gør sådan at man kan se hvor meget disk plads der er brugt, hvor meget der er tilbage og hvor meget der er i alt.

Håber i forstår.

Mvh
Jesper

Til at se hvor meget diskplads der er i alt skal du bruge funktionen DiskSize(Drev);

Fri diskplads: DiskFree(Drev);

Diskplads brugt: DiskSize(Drev); - DiskFree(Drev);

Drev er nummeret for drevet fx. 1=drev A, 2=drev B, osv.

Hvis drevet er ugyldigt (fx. hvis det ikke findes eller hvis det er en diskette- eller cd-drev hvor der ikke en en disk i) retunerer den -1.

skal man skrive noget i uses for hvis jeg skriver:

label1.Caption := DiskFree(3);

kommer den med den her fejl:

[Error] Unit1.pas(29): Incompatible types: 'String' and 'Int64'

hvad skal jeg laver om på???

SpeC