Fråga : Hur man tillfogar ett nytt värdera från en bilda på en subform

Hi
Can någon ger mig lite vägledning om hur man tillfogar en värdera i en sätta inie-typ, och att tillfoga samma värdera in i sätta in för typ på suben bildar för dokument för närvarande i databasen. Nya väljer upp sätta in, men jag behöver att sätta den in i dokument som redan ar skapade och, undrade vad det bäst långt som omkring går det var.

Thanks för din hjälp. Någon rådgivning är welcome. " klar "

Svar : Hur man tillfogar ett nytt värdera från en bilda på en subform

Förmiddag som I gissar dig, kallar Windows API för att kopiera sparar eller liknande, så du behöver endast PChar och stränger typer, och den ska Delphi kompilatorn avgör, enligt versionen, den korrekta sorten och korrekt API-version som den ska bruk.

Med Delphi <2009 :="">stränga = AnsiString
(P) Röding = (P) AnsiChar
och alla kallade fönster API är ANSI-versionen, före detta:
CopyFile = CopyFileA

Med Delphi >=2009
Stränga = WideString
Röding = WideChar
och alla kallade fönster API är den breda versionen


så ditt kodifiera bör göras för att sammanställa med alla versioner, utan att leka för mycket med andra typer, undantar, när du inte har primat
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

Var
 cDestino cOrigem: PChar;
 sFile sPath, sDiaSemana: Stränga;
 iProgBar: Heltal;
och;

  sFile: = ”PedItem.db”;
  cOrigem: = strtopchar (sPath+'\ '+sFile);
  cDestino: = strtopchar ('C:\Back - up_AcxSir \ '+sDiaSemana+sFile); 
  CopyFile (cOrigem, cDestino som, är falska); 


Notera att du kan konvertera stränger till PChar med precis en cast i långt aflarinen som visas för AnsiString & PAnsiChar. 
Så du kan även den din appellen fungera i en fodrar

  CopyFile (PChar (sPath+'\ '+sFile), PChar ('C:\Back - up_AcxSir \ '+sDiaSemana+sFile) som, är falska);
Andra lösningar  
 
programming4us programming4us