Dit waarschijnlijk??
function FileCopy(const fromDir, toDir: string): Boolean;
var
fos: TSHFileOpStruct;
begin
Fillchar(fos, SizeOf(fos), 0);
with fos do
begin
wFunc := FO_COPY;
Type: Posts; User: AppY; Keyword(s):
Dit waarschijnlijk??
function FileCopy(const fromDir, toDir: string): Boolean;
var
fos: TSHFileOpStruct;
begin
Fillchar(fos, SizeOf(fos), 0);
with fos do
begin
wFunc := FO_COPY;
Ik weet het niet zeker meer, maar volgens mij moet je bij een TImage ook het canvas vergroten. Ik heb er zelf ook mee gezeten dat een plaatje niet goed zichtbaar was. Maar door:...
Ik weet niet of Ilse alleen de ID3 tags wil lezen of dat ze de files ook wil afspelen, maar ik heb goede ervaring met audiogenie als het alleen om tags lezen gaat, of met de BASS library als je de...
procedure TForm1.ComboBox1Click(Sender: TObject);
begin
if Flag = true then
begin
Flag := False;
exit;
end;
end;
procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key:...
Als je directories op de Externe SD-Card wil bereiken, dan ben je een hulpje nodig.
En over de TJRingtoneManager + Delphi kan ik ook niet heel veel vinden.
Succes! :)
Leuk hé dat android :)
TPath.GetRingtonesPath komt uit in een subfolder van je programma. Daar kan alleen je programma naar schrijven (is de bedoeling).
TPath.GetSharedRingtonesPath Komt uit in...
Waarschijnlijk moet je het via TJRingtoneManager doen.
zie bijvoorbeeld hier en hier.
De icy-metadata (station, titel, artiest) zit in de stream.
Ik gebruik zelf de BASS-audio library om naar een stream te luisteren en daarmee kun je dan ook de icy-metadata opvragen. Als je de...
Je kan: 'External storage helper functions for Android' downloaden.
met GetExternalSDCardDirectory of GetSysSecondaryStorage kan je dan je extSdCard vinden.
Er zit trouwens verschil in...
En wat geeft je telefoon zelf aan, als je kijkt naar de machtigingen van je app?
Ik heb zelf versie 10.2
Ik ben ook een beetje aan het testen geweest.
Als je een directory zoekt die je zelf aan kan passen, moet je denk ik TPath.GetPublicPath gebruiken. Dan kom je in de directory:...
Access_coarse_location & access_fine_location voor de locatie permissions
Heb je bij user permissions ook "read extrernal storage" & "write external storage" aangevinkt?
Maar waarom zet je je bestanden niet in het mapje 'documenten'? Die heeft toch een vaste plek?
System.IOUtils.TPath.GetDocumentsPath
sorry...
System.IOUtils.TPath.GetSharedDocumentsPath
Je checkt ook de rows die al gedelete zijn. Dus je moet van onder naar boven checken op lege cellen/rows.
Volgens mij moet je van:
ValueListEditor1.InsertRow( 'Klant', pKlantInfo.Klant, false);
het volgende maken
ValueListEditor1.InsertRow( 'Klant', ...
En als je je code veranderd naar:
...
...
StringGrid1.Cells[4, varRijTotaal] := IntToStr(varSpeler4Totaal);
StringGrid1.TopRow := StringGrid1.varRijTotaal + 1; // scroll row
...
regel 480 moet worden:
settings([fsbold],clYellow,[fsbold],clYellow,[fsbold],clYellow,[fsbold],clYellow,clRed)
Yellow moet zijn clYellow en de puntkomma aan het einde verwijderen (hoort niet...
Heb je deze procedure wel toegevoegd aan de declaratie van je Form? De compiler gaat al protesteren op plek 18. Op regel 456 is dat na: procedure TFmain.
Dus de procedure "settings(.....) " is nog...
Op regel 456 sluithaakje en puntkomma weghalen?
In OnMouseDown sla je de oude Panel.Width op - X (bv OldWidth:= panel.width - X)
In OnMouseMove doe je Panel.Width:= OldWidth + X;
Dan moet het goed gaan.
Die had ik ook gezien, maar ik kwam ook deze tegen.
Dat klopt wel, maar StrCmpLogicalW heeft als extra dat hij getallen ook goed sorteert. 1, 2, 10 ipv 1, 10, 2
Of ik doe iets fout?
Wat is op korte termijn dan de oplossing?
Ik heb het als volgt gedaan.
function LogicalCompare(List: TStringList; Index1, Index2: Integer): Integer;
begin
Result :=...