--- a/ax25_demod.c
+++ b/ax25_demod.c
@@ -4376,11 +4376,11 @@
 	word k, len, i;
 
 	Byte zeros, ones;
-	TStringList need_frames;
+	TStringList: need_frames;
 
 	s = data;
 
-	CreateStringList(&need_frames);
+	need_frames = TStringList.Create;
 	len = data->Length;
 
 	memcpy(crc, &data->Data[data->Length - 18], 18);