Einzelnen Beitrag anzeigen

Gernot Huber

Registriert seit: 26. Mai 2011
Ort: Dülmen
13 Beiträge
 
Delphi 2010 Professional
 
#6

AW: GDI+ viele Encoder parameter setzen ARRAY[0.0.]

  Alt 13. Jul 2012, 07:39
Probier es mal so aus:

Delphi-Quellcode:
  parameterValue1: TEncoderValue;
  parameterValue2: TEncoderValue;
  parameterValue3: ULONG;
  parameterValue4: ULONG;

  encoderParameters.Count := 3;
  encoderParameters.Parameter[0].Guid := EncoderSaveFlag;
  encoderParameters.Parameter[0].Type_ := EncoderParameterValueTypeLong;
  encoderParameters.Parameter[0].NumberOfValues := 1;
  encoderParameters.Parameter[0].Value := @parameterValue1;
 
  encoderParameters.Parameter[1].Guid := EncoderCompression;
  encoderParameters.Parameter[1].Type_ := EncoderParameterValueTypeLong;
  encoderParameters.Parameter[1].NumberOfValues := 1;
  encoderParameters.Parameter[1].Value := @parameterValue2;
 
  encoderParameters.Parameter[2].Guid := EncoderColorDepth;
  encoderParameters.Parameter[2].Type_ := EncoderParameterValueTypeLong;
  encoderParameters.Parameter[2].NumberOfValues := 1;
  encoderParameters.Parameter[2].Value := @parameterValue3;
 
  encoderParameters.Parameter[3].Guid := EncoderQuality;
  encoderParameters.Parameter[3].Type_ := EncoderParameterValueTypeLong;
  encoderParameters.Parameter[3].NumberOfValues := 1;
  encoderParameters.Parameter[3].Value := @parameterValue4;
 
  parameterValue1 := EncoderValueMultiFrame;
  parameterValue2 := EncoderValueCompressionNone;
  parameterValue3 := PixelFormat16bppRGB565;
  parameterValue4 := 100;
Gruß
Gernot
  Mit Zitat antworten Zitat